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PROLOGO 


Desde el momento en que pudimos disponer de uno de los tan 
prometidos ordenadores CPC, nos quedamos maravillados con esta 
prodigiosa máquina. El BASIC del CPC es realmente extraordinario. 
En el momento de ocuparnos de su estructura interna y de la 
programación máquina, notamos que lamentablemente todavía no están 
disponibles informaciones suficientes sobre el tema por el 
momento. Así se nos ocurrió la idea de confeccionar este libro. 

La programación en lenguaje máquina ofrece algunas ventajas 
decisivas frente al lenguaje BASIC, en cuanto a velocidad y 
requerimientos de memoria para almacenamiento de datos. El objeto 
de este libro, consiste en facilitar al usuario del CPC el acceso 
al lenguaje máquina y de este modo permitirle el aprovechamiento 
de las ventajas antes mencionadas para sus programas. 

Sin embargo el aprendizaje del lenguaje máquina no es tan sencillo 
porque ¿quién es capaz de comprender la siguiente línea sin 
ninguna explicación? 

21,00,CO,36,CC,23,BC,20,FA,C9 

Pero no se desanime tan pronto. Le resultará sencillo trabajar en 
lenguaje máquina si maneja el libro de la siguiente manera: 

- Trabaje el libro a fondo capitulo a capítulo. 

- Intente resolver los ejercicios 

- Si ello le resulta difícil, revise nuevamente el capitulo. 

Pero basta ya de buenos consejos. Desde ahora le invitamos a 
entrar en la aventura del LENGUAJE MAQUINA. 


Los autores. 
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CAPITULO I : INTRODUCCION 


l.l ¿Qué es el LENGUAJE MAQUINA? 


El Lenguaje Máquina es el lenguaje de programación que el 
ordenador es capaz de tratar directamente. ¿Qué se entiende por 
ésto?. Como usted seguramente sabrá, cada ordenador posee un 
microprocesador que podemos considerar como el "cerebro" del 
ordenador. Este IC (Circuito Integrado) se denomina CPU (Central 
Processing Unit) o Unidad Central de Procesamiento (UCP). La CPU 
ejecuta las órdenes de la máquina, dirige el funcionamiento del 
ordenador y el de todos los periféricos. La Unidad Central es la 
pieza clave de todo el ordenador. Cuando programamos en lenguaje 
máquina, utilizamos comandos dirigidos directamente a la CPU, la 
cual puede ejecutarlos inmediatamente. Con ello, el lenguaje 
máquina depende de cada uno de los diferentes tipos de procesador. 
Los ordenadores CPC poseen un procesador Z80, que también halla 
aplicación en muchos otros microordenadores. El Z80 es una unidad 
central de gran rendimiento; entiende más de óOO comandos que 
trata a gran velocidad. 

¿Por qué en realidad Lenguaje Máquina? 

La mayoría de los ordenadores domésticos están equipados con 
BASIC. Como seguramente ya habrá observado, el aprendizaje de este 
lenguaje no presenta gran dificultad. El BASIC CPC llama la 
atención especialmente por su variedad de comandos. Da la 
impresión como si con este BASIC no quedaran nunca deseos sin 
cumplir, pudiendo quedar siempre bien resueltos todos los 
problemas de programación. 
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Imagínese usted: 


El Ministro de Asuntos E;<teriores, Sr. BASIC, negocia con su 
colega, el Sr. CPU, en el país del Lenguaje Máquina. 
Desgraciadamente, sus conocimientos de ese idioma son muy 
escasos, de modo que solicita los servicios de la intérprete, 
la Srta. Interpreter, quien traduce sus -frases al lenguaje 
máquina. Como es de suponer, la Srta. Interpreter, a pesar de 
ser una excelente traductora, siempre es un poco más lenta en 
la traducción que el político en su discurso, y debido a 
ello, se prolonga innecesariamente el diálogo de la 
negociación. 

Al programar en BASIC encontramos exactamente con el mismo 
problema. A través del interpretador, el ordenador ha de 
interpretar primero el BASIC escrito por el programador. El 
interpretador de BASIC es una parte de los programas ya 
incorporados, que interpreta el programa siguiendo uno a uno cada 
comando dado. Acto seguido, provoca la inmediata ejecución de los 
mismos. Para ser más exactos: el interpreter reconoce el comando 
BASIC y luego, resuelve la ejecución de dicho comando BASIC a 
través de la llamada a las rutinas en Lenguaje Máquina de cada 
comando concreto. 


Por ejemplo: 


MODE 2 


En primer lugar, el interpretador lee el comando carácter a 
carácter, donde por ejemplo, los espacios, dos puntos, paréntesis 
y comas le indican cuando ha finalizado una palabra. La palabra 
(MODE) la compara con las entradas de la tabla de comandos en 
BASIC del ROM. Si no la encuentra, intenta interpretar la palabra 
como variable. Si ello tampoco funciona, saca un mensaje de error. 
Si el interpretador encuentra la palabra, bifurca hacia la 
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dirección de salto correspondiente a la palabra. Allí se lee el 
siguiente valor, en nuestro ejemplo: 2; se veri-fica la 

admisibilidad de ese argumento y se ejecuta el comando. Luego, se 
vuelve de nuevo al interpretador y el proceso descrito arriba 
comienza nuevamente. La labor que, en nuestro ejemplo desempeña la 
Srta. Interpreter, requiere algo de tiempo. Este tiempo se ahorra 
si programamos directamente en lenguaje máquina. 

Desgraciadamente el lenguaje máquina presenta el inconveniente de 
ser muy abstracto. Básicamente, al hombre le resulta di-fícil 
imaginarse cifras. Esta dificultad es la causa de la creación de 
los denominados "Lenguajes Superiores de Programación", tales como 
el LOGO, BASIC, etc., que operan con conceptos y no con cifras. 
Estos lenguajes presentan un compromiso en la comunicación entre 
el hombre y la máquina. Sin embargo, desgraciadamente ello trae 
consigo importantes inconvenientes en cuanto a la velocidad, a la 
necesidad de espacio en la memoria y, a menudo también, en cuanta 
a la posibilidad de programación. 


Todos los lenguajes de programación, tales como el Cobol, Pascal, 
Fortran, etc, han de ser traducidos antes de ser ejecutados por el 
ordenador. Aquí se distingue entre interpretador y compilador: 

Un interpretador, como por ejemplo el del ordenador CPC, traduce 
paso a paso todos los comandos del programa, ejecutándolos 
simultáneamente. El interpretador es, por consiguiente, un 
traductor simultáneo; es decir, que durante el desarrollo del 
programa, cada comando se interpreta nuevamente. Por ello, las 
modificaciones en BASIC no plantean problemas. 

Contrariamente a ello, un compilador traduce cada programa una 
única vez, creando al mismo tiempo otro programa equivalente en 
lenguaje máquina. Sólo entonces puede ejecutarse el programa en 
lenguaje máquina. Por lo general, el proceso del compilador dura 
bastante, pero una vez realizado, el programa en lenguaje máquina 
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producido se'ejecuta a gran velocidad. Si se desea modificar el 
programa, deberá compilarse nuevamente la versión modificada del 
mismo. Esto hace que las modificaciones en tales programas sean de 
larga duración. En este libro le presentamos un compilador que 
traduce de lenguaje ensamblador a Código Máquina o Lenguaje 
Máquina. A este compilador se le denomina ENSAMBLADOR. 


Aquí puede reconocerse una ventaja fundamental del lenguaje 
máquina: los programas en lenguaje máquina alcanzan una velocidad 
de ejecución hasta 1000 veces superior que los programas en BASIC. 

Asimismo los programas en lenguaje máquina escritos a medida para 
resolver un problema especial, son más rápidos que los programas 
en lenguaje máquina confeccionados mediante compilador. El comando 
RETURN en BASIC tiene un tiempo de ejecución de aprox. 0.6 
railisegundos; el comando correspondiente RET en lenguaje máquina 
necesita sólo 2.5 microsegundos. Ello hace que la orden RET en 
lenguaje máquina sea casi 240 veces más rápida, y en su 
equivalente para el comando POKE en lenguaje máquina, hasta casi 
1000 veces. Tales diferencias son importantes a la hora de, por 
ejemplo, ordenar y buscar en grandes cantidades de datos, 
desplazar contenidos en la memoria, como es necesario para el 
Scrolling o también para programas de textos. Además, la 
programación de gráficas complejas en BASIC es demasiado lenta; es 
decir, el lenguaje máquina se hace indispensable para programas de 
juegos y gráficas profesionales. 

Existen también otras ventajas: 

Por regla general, los programas en lenguaje máquina son más 
cortos que los programas en BASIC, con lo cual se ahorra un 
importante espacio en la memoria. Tan pronto como usted haya 
escrito sus primeros programas en lenguaje máquina comprobará que 
un programa en lenguaje máquina de más de 500 bytes ya es muy 
largo y que pueden hacerse muchas cosas con él. Por el contrario, 
para un programa en BASIC de similares características, se 
necesitaría mucho más espacio de memoria. 
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NOTA: La longitud de un programa BASIC en BYTES puede calcularse 
con el CPC con "PRINT HII1EM-FRE(0)-370". 

Otra ventaja del lenguaje máquina estriba en que únicamente con él 
pueden aprovecharse al máximo todas las posibilidades del 
ordenador. En primer lugar, con lenguaje máquina es más rápido 
programar, por ejemplo datos de entrada o salida. Asimismo, con 
ayuda de programas propios pueden controlarse periféricos de 
entrada/salida, y recibir datos desde ellos. También sólo en 
lenguaje máquina es posible desarrollar estructuras de datos 
propias, las cuales, generalmente, ahorran mucho más espacio que 
las dadas en BASIC. Grandes cantidades de datos como las que 
aparecen - entre otras- en el tratamiento de textos, pueden de 
este modo almacenarse mejor en la memoria disponible. 

Estos ejemplos deberían ser suficientes para poner de manifiesto 
la necesidad del lenguaje máquina incluso en el caso de un 
ordenador CPC con muy buen lenguaje BASIC. Sin embargo hay que 
decir que la programación en lenguaje máquina presenta un gran 
inconveniente. 

El lenguaje máquina es el lenguaje de la CPU del ordenador y por 
lo tanto, el lenguaje más orientado hacia la máquina. Ello supone 
que el programador deberá pensar de un modo muy abstracto para 
llegar a entender este lenguaje. El ser humano tiende a pensar en 
palabras y asociaciones; es decir, que un lenguaje orientado hacia 
el hombre utiliza estructuras y conceptos claros. En el caso del 
lenguaje máquina esto no es asi. Principalmente, la CPU sólo 
entiende cifras; es decir que un programa para la máquina se 
reduce simplemente a una serie de números y no a una secuencia de 
conceptos. En tal forma, la programación en lenguaje máquina para 
programas extensos sería casi imposible. Por ello los "pioneros de 
la informática" ya desarrollaron una especie de lenguaje 
intermedio, capaz de hacer más inteligibles y claros los programas 
en lenguaje máquina. A este lenguaje se le denominó ENSAMBLADOR. 
El lenguaje ensamblador ordena a cada código de la máquina (o sea, 
a una cifra) una serie de símbolos. Tales símbolos se componen dei 
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1. Las palabras del comando: consisten generalmente en una 

abreviación de la palabra inglesa de comando, denominada 
también mnemónico. 


2. El operando que, por ejemplo, especifica las direcciones, 
constantes o similares (concernientes al comando). 

De este modo, la confección de un programa en lenguaje máquina se 
simplifica al escribirlo en ensamblador. Luego, este lenguaje 
ensamblador es traducido automáticamente al lenguaje máquina por 
el denominado "Programa Ensamblador". Un ensamblador de este tipo 
(un compilador para lenguaje ensamblador) es el que presentamos en 
este libro, para que puedan los lectores programar en ensamblador 
(nos referimos aquí al lenguaje ensamblador o Assembler). 


1.2 EL PRIMER PROGRAMA MAQUINA 


Para enseñarles que es muy útil el aprendizaje del . lenguaje 
máquina, ofrecemos la comparación entre un programa BASIC y su 
primer programa en lenguaje máquina. 

Entre las siguientes lineas BASIC 


10 HL=!<C000 
20 POKE HL,Í(CC 
30 HL=HL+1 

40 IF HL <=«<FFFF THEN 20 
50 RETURN 

A continuación entre en modalidad directa "MODE 2" tecleando 
seguidamente "GOSUB 10" y observe el resultado. 

El siguiente programa carga el programa máquina con el mismo 
propósito que el anterior en BASIC: 
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10 MEMORY ?<9FFF 

20 FOR I=í<AOOO TQ Í<A009 

30 READ a 

40 POKE i,a 

50 NEXT I 

60 END 

70 DATA &21,?<00,!<C0,í<36,!<CC,S!23,!<BC,!<20,8(FA,SíC9 

Ahora introduzca nuevamente en modalidad directa “MODE 2", cargue 
el programa máquina con "RUN" y llame al programa máquina 
cargado con CALL StAOOO, quedará sorprendido. 

Como habrá podido comprobar, los tiempos son: 

- Programa BASIC: Aprox. 1 minuto 

- Programa máquina: Aprox. 1/10 segundo. 

El tiempo de ejecución puede calcularse teóricamente. 

Para nuestro programa ejemplo seria por ejemplo 0,1106 segundos. 

La longitud comparativa de los programas: 

- Programa BASIC: 88 bytes 

- Programa máquina: 10 bytes 

Desde &A000 hasta ttA009. 


Esperamos que no haya su-frido un schock demasiado Tuerte con todas 
estas novedades. En los capítulos siguientes se lo explicaremos 
todo paso por paso. 


Para la analogía de los programas: 


BASIC 


ENSAMBLADOR 


10 HL-ífCOOO 
20 POKE HL.&CC 
30 HL*HL+1 

40 IF HL < -ííFFFF THEN 20 
50 RETURN 


LD HL,C000 
LD (HL),SiCC 
INC HL 
CP H 

JR NZ,*-6 > A006 
RET 
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EXPLICACION: 


Línea 10: Aquí se posiciona el valor para la variable HL, es 
decir el registro HL en el inicio de la memoria de 
pantalla (LD = inglés Load = Carga). 

Línea 20: En esta línea se almacena el valor t<CC en la dirección 
HL. Dado que la memoria de pantalla está posicionada 
desde Í<C000 hasta 8<FFFF este comando provoca una 
modificación de pantalla. 

Prueben con diferentes valores para la dirección HL en la memoria 
de pantalla en modalidad directa (HL puede encontrarse entre StCOOO 
y S(FFFF) así como para el argumento (en nuestro ejemplo StCC) que 
puede adoptar valores entre S<00 y !<FF (p. ej. POKE SfClOO,!<AA). 

Línea 30: Incrementa la variable HL es decir el registro HL,- en 
1. (INC=ingl. Increase = incrementar). 

Linea 40; Comprobación si HL es mayor que íiFFFF es decir si se 
ha llegado al final de la memoria de pantalla. Esto en 
lenguaje máquina tiene que realizarse con 2 comandos: 
CP (ingl. » Compare » comparar); JR (Jump relative = 
bifurcación relativa); NZ (ingl. not zero = no cero). 
Puede decirse; "bifurca, si se verifica condición no 
cero (NZ).". 

Esta explicación no es completamente exacta, más 
adelante en este libro haremos la aclaración 
correspondiente. 

En las siguientes lineas presentamos el listing de ensamblador del 
ejemplo: 
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LISTADO ENSAMBLADOR para el programa en lenguaje máquina 


Dir. Código N.BASIC Comando Ensamblador Comentario 


AOOO 

2100C0 

10 

LD 

HL.COOO 

Inicio memoria 
de pantalla 

A003 

36CC 

20 

LD 

(HL),Í(CC 

S<CC valor a grabar 
en memoria pantalla 

A005 

23 

30 

INC 

HL 

HL = HL + 1 

A006 

BC 

40 

CP 

H 

Comparación vs 0 

A007 

20FA 

50 

JR 

NZ,$-6>A006 

Si no cero (NZOO), 
vuelve al paso 6 del 
programa; si 0 al si¬ 
guiente comando 

A009 

C9 

60 

RET 


Retorno al BASIC 

Esperamos haber 

despertado 

su 

curiosidad. 

ya que a partir de 


ahora, pasaremos al tratamiento sistemático del lenguaje máquina y 
explicaremos los ejemplos dados arriba. 


1.3 SISTEMAS NUMERICOS. 


En el capítulo anterior se ha utilizado el símbolo it como 
indicador para un número del sistema hexadecimal (hexadecimal 
16). ¿Qué significa todo esto?. 

En la realización de sistemas de cálculo electrónico hay 2 formas 
de representación numérica. 

Analógicas En un ordenador analógico se representa un número 
mediante un voltaje, por ejemplo 1=1 voltio y 100=100 voltios. Por 
ello un reloj con agujas es un reloj analógico. El aumento del 
tiempo corresponde <de forma análoga) al número de vueltas de la 
aguja. 
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Digital; Un ordenador digital se basa en la idea de no utilizar la 
medida del voltaje sino únicamente 2 estados: hay corriente o no 
hay corriente. Digital significa la representación de cantidades 
mediante números. Los estados ACTIVO y DESACTIVO corresponden a 
los números 0 y 1. 


De esta forma un ordenador digital solamente tiene 2 dígitos 
disponibles. Con ayuda de este concepto se realiza la 

representación numérica en el ordenador. 

Para tareas fijas puede ser más conveniente trabajar con un 

ordenador analógico (por ejemplo control de maquinaria). Si se 
quieren resolver diferentes problemas en un ordenador, el 
ordenador digital supera al analógico porque la programación del 
ordenador analógico en la forma que conocemos es imposible. Esto 
quiere decir que todos los ordenadores personales y domésticos son 
ordenadores digitales que trabajan con el sistema dual (con las 
cifras 0 y 1). 

Para el programador son significativos los siguientes sistemas de 
numeración; 

1. Sistema decimal 

2. Sistema binario 

3. Sistema hexadecimal 


Los sistemas numéricos son esquemas de cifras ordenadas según un 
determinado principio. Cada dígito puede convertirse m otro 
sistema numérico. En todos los sistemas numéricos, el valar 
posicional de un dígito aumenta de derecha a izquierda. 

Para explicar los restantes sistemas numéricos, partiremos oel 
conocido sistema decimal. 
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SISTEMA DECIMAL 


Centena 

Decena 

Unidad 

- Valor posicional 

3 

5 

6 

- Dígitos 


El valor poslcional aumenta de derecha a izquierda 


teñe i a 

Número 

Denominación 

O 

o 

1 

U-nidad 

1 

10 

10 

D-ecena 

2 

10 

100 

C-entena 

3 

10 

1000 

M-illar 

4 

10 

10000 

D-ecena de mil 

6 

10 

1000000 

Millón 


El número decimal 1335 puede representarse como siguei 

1335 significa: IM + 3C + 3D + 5U 

435 significa: 4C + 3D + 51) 

1335 es : 1*1000 + 3*100 + 3*10 + 5*1 

3 2 10 

1335 es también: 1*10 + 3*10 -i- 3*10 + 5*10 
Se define una potencia de exponente 0 con valor 1. 

0 0 Ó 

Ejemplo: 10 =1, 2 ^1, x >1 
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El Sistema DUAL 


El sistema Dual, se basa en el mismo principio. La di-ferencia 
fundamental en este caso es que la cifras no se forman a través de 
potencias de 10 sino por medio de potencias de 2. 

La base del sistema Dual es entonces 2. 

Binario 10101101 = Decimal 173 

7 6 5 4 3 2 1 0 

22222222 Valor de posición 

10 10 110 1 Cifra 

7-6 5 4 3 2 1 0 

173 = 1»2 + 0*2 + 1*2 + 0»2 + lt2 1*2 + 0*2 + 1*2 

173 = 1*128 + 0*64 1*32 0*16 + 1*8 + 1*4 + 0*2 + 1*1 


De momento ha aprendido ya a tranformar números binarios a sistema 
decimal. Naturalmente, este proceso también se puede hacer a la 
inversa. Para aclarar el proceso inverso, observemos la cifra 
decimal 173 antes calculada. 

Pensemos qué potencia de dos hay aún en esta cifra. Una ayuda: en 
principio el sistema binario puede aplicarse a números de n- 
digitos. Sin embargo, en el ámbito del ordenador sólo se utilizan 
números binarios de 8-posiciones. Pueden aparecer las siguientes 
potencias de dos. 


7 6 5 4 3 2 1 0 

Potencias de dos 22222222 


valor decimal 128 64 32 16 8 4 2 1 
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En este caso 2^7=128 es la potencia de dos más alta. Ahora 
calculamos la diferencia entre 173 y 128. El resultado es 45. Con 
este resto se procederá igual que anteriormente. Volvemos a buscar 
la potencia de dos más alta contenida en ese valor. Utilizando la 
tabla, se encuentra fácilmente y resulta 2''5=Z2. Finalmente, 
volvemos a calcular la diferencia; (45-32=13). 


El proceso descrito se sigue aplicando hasta que el resto sea 
cero. 


2''3=8 (13-8=5) 
2''2=4 ( 5-4=1) 
2 '' 0=1 ( 1 - 1 = 0 ) 


Asi hemos obtenido las siguientes potencias de dos: 

2''7, 2''5, 2''3, 2''2, 2''0. 

Debajo de cada potencia obtenida escribiremos un uno y debajo de 
la potencia inexistente un cero; 


7 

2 



3 2 1 

2 2 2 


0 

2 


10 10 


0 1 = 173 


La cifra decimal 173 viene expresada por lo tanto en el sistema 
binario por 10101101. En lo sucesivo, representaremos las cifras 
binarias anteponiendo el signo tcX. 

p. ej. 173 = S(X 10101101 


BIT Y BYTE 

Un bit es la unidad de información más pequeña a partir de la cual 
se componen todas las demás informaciones. BIT es la abreviación 
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de "binary digit", lo que equivale a decir: ci-fra binaria. Se 
habla de un BIT activado cuando el BIT tiene el estado 1, o de un 
BIT desactivado cuando tiene el estado 0. 

Los ordenadores CPC tienen un procesador de S-BITS; es decir, 
puede tratar largas cifras binarias de 8-BITS, que comprende los 
valores decimales 0-255. 

Número binario: 

10 110 111 

adaadaaa a= BIT activado; d = BIT desactivado 

76543210 número de BITS 

A cada BIT y a cada cifra se le asigna un número de BIT. El BIT 
con el.valor posicional más bajo, es decir, el que está más a la 
derecha, tiene el número 0. La numeración aumenta de derecha a 
izquierda. El número de BIT corresponde al exponenete de la 
potencia de 2, que determina el correspondiente valor posicional. 

En el ordenador, tiene sentido algunas veces imaginarse los 
estados del BIT como un interruptor. 

INTERRUPTOR ABIERTO = l 
INTERRUPTOR CERRADO = 0 

En un número de 8 interruptores se presentan valores de 0-255, es 
decir, 256 estados diferentes del interruptor. 

El conjunto de 8 interruptores (BITS) recibe el nombre de BYTE. Un 
BYTE puede colocarse en una determinada posición de memoria del 
ordenador. ¿Pero cómo se memorizan o graban números superfSres a 
255?. 
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Para ello se divide el número en 2 mitades: el LOW Byte (inglés 
low=bajo; byte de valor bajo) y el HIGH byte (inglés high=alto¡ 
byte de valor alto). Estos bytes son entonces colocados en 2 
posiciones contiguas de la memoria. 

El HIGH byte y el LOW byte se calculan de la siguiente -forma: 

Número dividido por 256 = (High byte) +■ resto 
El resto de la división será el LOW byte. 

Recordemos: El número 255 es el valor máximo representable con un 
byte compuesto de 8 bits consecutivos. 

Ejemplo: el número 34065 debe descomponerse en un LOW y en un HIGH 
byte. 


34065 / 256 = 133 resto 17 
34065 = 133 » 256 + 17 

133 = HIGH byte 
17 = LOW byte 

La generalización codi-ficada en BASIC seria: 

1. HB «= INT(Número / 256) HB = High byte 

LB = Número - HB * 256 LB = Low byte 

Esta forma se aplica en números de tamaño variable. 

2. HB = Número < 256 HB = High Pyte 

LB “ Número MOD 256 LB = Low Byte 

Esta segunda fórmula se utiliza en números del rango comprendido 
entre 32768 y 32767. 


Con ello, un número comprendido entre 256 y 65535 en la memoria 
necesita 2 bytes. 
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Para simplificar la representación de números, colocados de esta 
forma en la memoria, es mejor adoptar otro sistema de numeración. 


El sistema Hexadecimal. 

La base del sistema hexadecimal es 16. 

Recordemos; 

La base del sistema decimal es 10. 

La base del sistema binario es 2. 

Para representar números cuyo valor sea superior a 10, se utilizan 
en el sistema hexadecimal las letras A hasta F. 

Sistema decimal: 

0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,... 

Sistema hexadecimal; 

0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,10,11,12,13,14,... 


En primer lugar convertiremos números hexadecimales a decimales: 


Potencia Valor 


0 


16 

1 

1 


16 

16 

2 


16 

256 

3 


16 

4096 
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!<3ABF=3*16''3 + 10»16''2 + + 15»16''0 

8¡3ABF=3*4096 + 10*256 + 11*16 + 15* 1 

Í<3ABF= 12288 + 2560 + 176 + 15 

8(3ABF= 15039 


Otro ejemplo! 

Í(1A3E = 1*16''3 + 10*16''2 + 3*16''! + 14*16''0 

!<1A3E = 1*4096 + 10*256 + 3*16 + 14*1 

Í<1A3E = 4096 + 2560 + 48 + 14 

Í<1A3E = 6718 

Ahora convertimos números decimales en números hexadecimal es. 

El procedimiento de cálculo es similar al descrito en páginas 
anteriores. Supongamos que el número decimal 45380 debe 
representarse en el sistema hexadecimali 

1. Pasoi Pensemos qué potencia máxima de 16 puede contener este 

número (pueden utilizarse para ello las tablas de 
conversi6n). 

2. Pasoi Dividimos nuestro número (45380) entre el valor obtenido 

(4096) y convertimos el número decimal asi obtenido en 
número hexadecimal. 

45380/4096 = 11 Resto 324 
Decimal = 11 Hexadecimal B 

3. Paso: Ahora seguimos el mismo procedimiento con el resto 

(324). Dividimos ahora entre el número siguiente de la 
tabla (que es 256). 


324/256 - 1 Resto 68 
Decimal=:l => Hexadecimal * 1 
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El cálculo anterior debe continuarse hasta el momento en que se 
obtiene 0 como resto de la división. 

68/16 =4 Resto 4 

Decimal = 4 => Hexadecimal 4 

4/1 =4 Resto 0 

Decimal = 4 => Hexadecimal 4 

El número de nuestro ejemplo es ?<B144 

La ventaja del sistema hexadecimal estriba en que el ser humano 
puede leer directamente el Low y High byte. 

Para Sí 3ABF por ejemplo: 

- Pueden unirse las ci-fras correspondientes al High-Byte (3 y A), 
Tienen en este caso el valor decimal (3»16''l + 10iH6''0) = 58. 

- Unimos ahora las ci-fras del Low-Byte <B y F) convirtióndolas 
conjuntamente y tenemos en decimal (ll»16''l + 15tl6'''0) =191. 

Entren entonces lo siguiente: 

PRINT PEEK(9),PEEK(10) 

En ambas direcciones 9 y 10 está la dirección de salto, a la que 
bi-furca el sistema operativo, cuando una rutina, situada por 
ejemplo en un módulo conectadle, ha de ser llamada. Para una 
dirección de salto es posible un valor entre 0 y 65535 (es decir 
hasta S<FFFF). Esta cantidad puede almacenarse mediante la ayuda 
del sistema High-Byte y Low-Byte. Ahora queremos calcular la 
dirección de SALTO. Con el^comando anterior de BASIC, obtenemos de 
la dirección 9 el valor 130 (CPC 664 Valor=138 / CPC 6128 
Valor=138) y de'la dirección 10 el valor 185 (CPC 664 Valor=185 / 
CPC 6128 Valor=185). En sistema decimal la dirección de salto 

resulta entonces 185»256-H30=47490 (CPC 664 185»256-H38=47498 / 

CPC 6128 185»256-H38=47498). 
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Realizaremos a continuación el mismo cálculo en el sistema 
hexadecimal: 

130=Si82 (CPC 664 138 = ?<8A / CPC 6128 138 = Sí8A) y 

185=8<B9 (CPC 664 185 = !<B9 / CPC 6128 185 = ?¡B9), como 

podrá comprobar con facilidad. El valor de la dirección de salto 
lo obtenemos escribiendo consecutivamente el High-Byte y el Low- 
Byte: 47490=?<B982 (CPC 664 47498 = ?<B98A / CPC 6128 47498 = ?<B98A) 

Así pues resulta igual de -fácil separar una cifra hexadecimal High 
y Low- Byte, así como componerla a partir de Bytes High y Low. Por 
regla general el Low-Byte de una cifra se halla en la dirección 
más baja de la memoria, y a continuación le sigue el High-byte. 

Con ésto, usted ha aprendido ya la primera ventaja del sistema 
hexadecimal. Además, es asimismo muy sencillo pasar del sistema 
decimal al sistema hexadecimal; para ello se subdivide una cifra 
binaria en 2 bloques, cada uno de 4 bits. El bloque desde el bit 0 
al bit 3 se denomina Low-Nibble y el otro bloque, desde el bit 4 
al bit 7, High-Nibble. Cada Nibble corresponde exactamente a un 
dígito hexadecimal. Ello es fácil de comprender, pues una cifra 
binaria de 4 bits puede contener como máximo el valor 15 
(15=8-<-4+2+l). Todos los valores desde 0 al 15 pueden representarse 
asimismo por una cifra hexadecimal (0,1, ...9, A,B,C,D,E,F). 
Observemos un ejemplo: 


110 1 
High Nibble 
8+4-f 1 
13 
S<0 


10 0 1 
Low Nibble 
8+1 
9 

?<9 


Así pues: ?<X11011001=S<D9 

Con un poco de práctica, usted podrá leer directamente de una 
cifra de 4 bits su correspondiente valor hexadecimal y viceversa, 
valiéndose para ello de la tabla siguiente: 
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Sistema Binario 

Sistema Hexadecimal 

Sistema 

Decimal 

0000 

0 



0 

0001 

1 



1 

0010 

2 



2 

0011 

3 



3 

0100 

4 



4 

0101 

5 



5 

0110 

b 



6 

0111 

7 



7 

1000 

8 



8 

1001 

9 



9 

1010 

A 



10 

1011 

B 



11 

1100 

C 



12 

1101 

D 



13 

1110 

E 



14 

lili 

F 



15 

De igual modo 

funciona la conversión del sistema hexadecimal al 

sistema binario 

. Cada número hexadecimal se 

I sustituye por la 

combinación de 4 

bits, p. ej. Í<C7=S<X1100 

oin. 



La comprensión 

de la conversión de 

los 

diferentes 

sistemas 

numéricos es una 

base para la programación en 

lenguaje máquina. 


Ejercicio: 

1. Complete la siguiente tabla; 


Decimal Binario Hexadecimal 


130 ? ? 

? «(XlOOlOOl ? 

57312 - ? 

? - Í<C0B6 

? ? ?<37 
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2. El valor 37315 debe almacenarse a partir de la posición de 
memoria ?<flOOO. Calcule el High-byte y el Low-byte 
proporcionando los correspondientes comandos BASIC para 
almacenar el número. 


3. A partir de la posición de memoria 8(0006 hay una importante 
dirección de bi-furcación del sistema operativo. ¿Qué valor 
tiene? 

Soluciones: 


1 . 


Decimal Binario Hexadecimal 


130 S<X 10000010 8(82 

147 8(X 10010011 8(93 

57312 - 8(DFE0 

49334 - S(C0B6 

55 8íX00110111 8(37 


2. High-Byte=145=8(9l5 Low-Byte=195=8<C3 

POKE 8(A000,8(C3!P0KE 8(A00 1,8(91 

3. Low-Byte=PEEK(8(0006), High-Byte=PEEK(8(0007) 
Dirección de bi-furcación=8(0580 


En el epílogo del libro encontrará una tabla de equivalencias con 
valores desde 0-255 (1-Byte) en los 3 sistemas de numeración. 


1.4 ARQUITECTURA DEL ORDENADOR 


Si queremos dedicarnos a la programación en lenguaje máquina, 
antes deberemos hacernos una idea de la estructura y organización 
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interna del ordenador. En el presente capítulo intentaremos 
desarrollar una imagen que se adapte a nuestras necesidades. 

Usted ya sabe que posee un ordenador de 64K (K-Kilobyte=1024 
Bytes). Ello significa que la capacidad de memoria de su ordenador 
es de 64*1024=65536 bytes. Como un byte se compone de 8 bits 
unidos con los que se representan los datos de la memoria interna, 
resulta que su ordenador se compone de 64*1024*8 bits, es decir 
aproximadamente medio millón de interruptores que pueden adoptar 
los estados encendido o apagado. Sin embargo, tal expresión no 
tiene sentido para el trabajo concreto del ordenador, por lo que 
se han unido 8 bits en un byte. Estos 64*1024 bytes se encuentran 
en la memoria RAM del ordenador. RAM significa: Random Access 
Memory, en castellano, memoria de lectura y escritura o también, 
memoria de trabajo. Los 65536 bytes de RAM están numerados desde 
!<0000 hasta ?<FFFF. El número correspondiente al byte es su 
dirección. Esta dirección viene dada normalmente en una cifra 
hexadecimal. Podemos acceder directamente al RAM desde el BASIC, 
utilizando para ello los comandos PEEK y POKE. *PEEK (dirección)* 
lee el valor de los bytes situados en la dirección dada y *P0KE 
dirección,valor* altera el contenido de la dirección dada con el 
valor indicado. A cada dirección le corresponde un byte compuesto 
de 8 bits, es decir entre 0 y 255 (í(00-8<FF), el valor a almacenar 
deberá estar por ello dentro de este ámbito. Naturalmente la 
dirección debe hallarse entre ítOOOO y íiFFFF. 

La memoria RAM se utiliza para almacenar los programas 
introducidos en el ordenador. El contenido codificado de pantalla 
se almacena a partir de la dirección StCOOO, donde en MODE 2 un 
punto corresponde a un bit activado y viceversa. El RAM contiene 
asimismo diversas importantes rutinas del sistema operativo e 
informaciones sobre colares actuales, ocupación de teclado, 
caracteres definidos, etc. Esta información puede alterarse con 
instrucciones descontroladas que, modificando el contenido del 
RAM, pueden colapsar el ordenador. Por ejemplo, jamás intente POKE 
(< 8 , 0 . 
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La distribución del RAM es la siguientei 

8(0000 - i<0170 utilizado por el sistema 

í(0171 - 8(AB7F para programas BASIC 

■^AB80 - 8íBFFF sistema 

8(C000 - 8(FFFF memoria de pantalla 

Las direcciones comprendidas entre 8(AB80 y SíBFFF corresponden al 
sistema en los modelos de CPC 464 sin Floppy. Si se trata en 
cambio de un CPC 464 con Floppy, corresponde modificar la tabla 
anterior con 8(A6FB. En el caso del CPC 664 este valor es ?¡A67B y 
en el CPC 6128 es 8(A67B. 

A través del comando ÍMEMORY dirección* podemos limitar el espacio 
reservado para programas BASIC. De esta manera disponemos del área 
que comienza con la dirección indicada en el comando MEMORY hasta 
8íAB7F para almacenar nuestros programas máquina. En nuestro 
ejemplo hemos reservado el área 8<A000 hasta 8 íAB 7F para el programa 
máquina, mediante IMEMORY Í(9FFF», almacenándolo a continuación a 
partir de 8 íA 000 con la ayuda de comandos POKE. 

Quedarán sorprendidos al ver que se utilizan solamente un-poco más 
que S K de RAM para rutinas del sistema. 

¿Dónde están el interpretador y el sistema operativo, que nos 
hacen posible el programar en BASIC? 

Supone bieni 

Existe además otra memoria importante, el ROM (Read Only Memory= 
memoria de lectura o memoria de valor fijo). En el ROM se 
encuentran todos los datos y programas que nos permiten programar 
en BASIC sin dificultad. Puesto que la ROM es una memoria de valor 
fijo, se graba con datos y programas (en lenguaje máquina) y se 
instala en el ordenador antes de sa'lir de fábrica. Lamentablemente 
no es posible acceder al contenido de esta memoria ROM desde el 
BASIC. Cuando hayamos confeccionado un programa máquina para tal 
fin objeto, resulta lo siguiente: 
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El CPC incorpora 2 ROMS de 16K (más 16 K de ROM para manejo del 
Diskette) cuyas direcciones se superponen con las del RAM. Esto es 
necesario dado que el procesador Z80 posee únicamente 16 líneas de 
direccionamiento, es decir que la dirección de un byte no puede 
superar los 16 bits previstos. 

Con 16 bits queda perfectamente cubierto el espacio desde 8<0000 
hasta ?<FFFF. Para poder leer del ROM debe indicarse en primer 
lugar a la CPU que se desea leer el ROM y a continuación pueden 
utilizarse las mismas direcciones que las del RAM. _Lqs ROM ocupan 
las siguientes áreas; 

1. ROM SiOOQO - j<3FFF _ sistema operativo 

2. ROM j(COOQ - {<FFFF _ BASIC 

El sistema operativo contiene, como su nombre indica, las rutinas 
básicamente necesarias para que el ordenador trabaje. Su función 
es dirigir los periféricos, administrar los datos, mover datos, 
etc. En el área del ROM se encuentran asimismo las copias de las 
rutinas del sistema existentes en el RAM. Al conectar o hacer un 
Reset del ordenador, tales rutinas son copiadas del ROM al RAM. 
Además, en el ROM se encuentra la memoria de signos o caracteres 
(&38Q0-8<3FFF), donde cada carácter del ordenador se representa en 
una matriz de bits (es decir, 0-ningún punto, 1-punto). 

Los comandos BASIC programados por el usuario se ejecutan en el 
ROM de BASIC. La tabla de palabras de comando está, por ejemplo a 
partir de la dirección S<E388. Esta es la forma de almacenamiento 
del CPC. 

Naturalmente, nuestro ordenador posee además otros componentes, 
como por ejemplo el procesador Z80 o el Sound-Chip. En el próximo 
capítulo describiremos el procesador Z80. Si quieren ampliar la 
información presente sobre la arquitectura interna de su 
ordenador, les remitimos a los libros "CPC 464 INTERNO" y "CPC 664 
& 6128 INTERNO". 
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CAPITULO II: EL PROCESADOR Z80 

2.1 ESTRUCTURA DE LA CPU 


Periferia Z80 


Bus de datos 


TF 


jControU 

SP-Rec 

B 

C 

PC-Rec 

D 

E 






H 

L 



C Registro desplazamiento 


Adren! Ibus 16 Bit 




Bus de control 


O 


El ordenador CPC posee una CPU (Unidad Central de Procesamiento) 
basada en el procesador Z80. Recordemos que podemos calificar a la 
CPU como "el cerebro" del ordenador. De este modo, es correcta la 
denominación de MPU (MPU¡ del inglés Micro Processing Unit es 
decir Microprocesador). 
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En el presente capítulo nos ocuparemos de la estructura y de la 
■función de cada uno de los elementos que componen la CPU. El 
gráfico de esta página nos será de ayuda para comprender la vida 
interna de la Unidad Central. Observemos el diagrama de izquierda 
a derecha: 


1. CU (CU:ingl. Control Unit = Unidad de Control). 

Todos los movimientos del ordenador son controlados y dirigidos 
por esta unidad. 


2. Bus de Control. 

El Bus de Control es el "brazo largo" del CU. A través de él se 
dirigen y supervisan los elementos fuera de la CPU. 


3. Indicador de la pila SP (SP:ingl. Stack Pointer). 

Con ayuda del SP pueden guardarse en el RAM datos y direcciones 
de retorno de los subprogramas. 

Puesto que en el SP se almacenan direcciones, es un registro de 
16 bits. 


4. Contador de Programa PC (PC: ingl. Program Counter) 

El PC indica la dirección de memoria en la que se halla cada 
comando que ha de ejecutarse. 


S. Registros B a L 

La CPU posee varios registros, donde se almacenan los datos. 


6. Flags (Flag: ingl. flag = bandera; en este caso significa 
indicador característico). Los flags sirven como indicadores de 
determinados incidentes que acontecen en la CPU durante las 
operaciones del ordenador. Los flags pueden estar activados 
(flecha arriba), o desactivados (flacha abajo). 
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7. Bus de direcciones (se encuentra -fuera de la CPU) 

El Bus de direcciones realiza el enlace con otros MPU del 
ordenador. Indica el lugar de memoria en el ROM o en RAM, cuyo 
contenido ha de leerse o grabarse. El Bus de direcciones tiene 
una extensión de ló-bits, necesarios para direccionar el 
espacio de memoria de 64K. 

8. Bus de Datos (se encuentra -fuera de la CPU) 

Los buses de datos "trasladan" los datos que han de ser leídos 
o grabados. El bus de datos apunta así hacia la dirección de 
los datos. El bus de datos tiene una extensión de B-bits. 

9. Acumulador (lat. Akkumulator) 

El acumulador (ACU) es el registro más importante de la CPU. 
También se le puede calificar como el registro de cálculo. 

10. ALU (ALU: ingl. Arithmetical Logical Unit - Unidad aritmética 
lógica, Unidad de cálculo). 

La ALU realiza diversas operaciones aritméticas y lógicas. Los 
tlags se activan/desactivan en función del resultado de las 
operaciones. 

11. Cursor 

El cursor dirige las rutinas de rotación y traslación. 

Como ya hemos mencionado en el punto 5., la CPU contiene varios 
registros. Para comprender mejor su funcionamiento los hemos 
dividido en 5 grupos. 

1. El Acumulador 

2. Los Flags 

3. Los "seis asociables" registros de 8 bits 

4. Los "cuatro inseparables" registros de 16 bits 

5. Registro Interrupt/Refresh 
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2:2 EL ACUMULADOR 

El ACU, o bien el registro A, es el registro más importante del 
Z80. La mayoría de los comandos aritméticos y lógicos utilizan 
este registro. Cuando se ejecuta un comando de comparación, se 
e-fectúa ■fundamentalmente con el contenido del ACU. Al igual que 
todos los registros, excepto SP, PC, IX e lY, el registro A es un 
registro de 8-bits. 


2.3 LOS FLAeS 

El registro Flag o registro F, tiene una extensión de 8-bits (como 
A, B, C, D, E, H y L). Sin embargo, también tiene otras funciones. 
En el registro Flag se utilizan los distintos bits como 
indicadores para determinados sucesos originados durante las 
operaciones de la ALU (unidad de cálculo). Cada uno de los bits 
del registro F tiene el significado siguiente: 

S Z H P/V N C - Denominación del Flag. 

76543 2 10 - Número del bit 

C - Carry (acarreo) 

N - Sustracción 

P/V - Paridad/Desboradmiento 

H - Media Transferencia 

Z - Zero (cero) 

S - Sign (signo) 

Flag C (Bit 0) 

Si en el transcurso de una suma o resta se produce un acarreo, se 
activa este bit, de lo contrario se desactiva. 

Flag N y H (Bit 1 Bit 4) 

Estos flags los utiliza el Z80 internamente. Para nuestros fines, 
carecen de significado. 
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Flag P/V (Bit 2) 

Este -flag tiene una doble -función: 

Se activa cuando tiene lugar un desbordamiento (V Ingl. over-tlow), 
de lo contrario se desactiva. Además indica la paridad (P) de un 
byte. 

Flag Z (Bit 6) 

Este flag se activa cuando el resultado de una resta es cero, de 
lo contrario se desactiva. Se activa asimismo este flag como 
resultado de una comparación, en caso de igualdad. 

Flag S (Bit 7) 

Este flag se activa cuando el resultado de una suma o resta es 
superior a 127. Como veremos más adelante, en la aritmética de la 
CPU, los bytes superiores a 127 representan valores negativos. 

Los bits 3 y 5 del registro Flag no se utilizan. 


2.4 LOS "SEIS ASOCIABLES" REGISTROS DE 8-BITS 

Este grupo se compone de 6 registros de 8-bits, los registros B, 
C, D, E, H y L. 

Estos registros tienen la facultad de formar pares de registros, 
con el fin de crear un registro de 16-bits. En los registros C, E 
y L se almacena el Low-Byte, en los registros B, D y H el High- 
Byte. 

B/C (Byte Counter) 

El registro B, o mejor dicho el par de registros BC, se utilizan 
frecuentemente como contadores, por ejemplo en los bucles. 


H/L (High/Low) 

El par de registros HL se utilizan en general para almacenar 
direcciones. 
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Es conveniente habituarse a denominar los registros de esta forma, 
ya que algunos comandos utilizan los registros siguiendo esta 
nomenclatura. En principio pueden utilizarse también naturalmente 
el registro L o E como contador. 

Una particularidad del ZSO radica en que todos los registros antes 
citados se presentan nuevamente con la misma función. Este doble 
juego de registros está disponible, aunque sólo puede utilizarse 
un juego de registros cada vez. 


2.5 LOS "CUATRO INSEPARABLES" REGISTROS DE 16 BITS 

Este grupo está formado por 4 registros de 16 bits: SP, PC, IX e 
lY. 

El registro SP es un registro fijo; es decir, no puede 
descomponerse en 2 registros de 3 bits. El puntero de pila (SP) 
indica cada una de las direcciones de la memoria, que contienen 
direcciones de retorno o datos de memoria intermedia. La dirección 
se refiere a una posición de memoria situada en un espacio del 
RAM, denominado Stack o Pila. La utilización de los Stacks para el 
almacenamiento de datos se lleva a cabo de la siguiente manera: 

Al conectar el ordenador se coloca el SP en la dirección más 
elevada de la pila (ÍCOOO). Si hay que colocar un Byte en la pila, 
entonces el SP se reduce automáticamente en 1, almacenándose este 
Byte en la dirección indicada por el SP. Así pues, el SP apunta 
siempre al último elemento de la pila. Al "recoger de la pila", el 
proceso es inverso. En primer lugar, se lee el Byte en la 
dirección indicada por el SP, a continuación se incrementa el SR 
en 1. De este modo, es posible encadenar llamadas a los 
subprogramas. 

El PC es un registro especial. Desde un programa no puede grabarse 
ni modificarse. El PC se administra internamente e indica siempre 
la dirección del comando actual. 

Los registros IX/IY se utilizan fundamentalmente para almacenar 
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direcciones o direcciones relativas. Al igual que todos los 
registros descritos en 2.5, estos 2 registros pertenecen también a 
los registros de 16-bits. En éstos no es posible acceder por 
separado al High-Byte y al Low-Byte (como ocurre con los registros 
BC, DE y HL). El uso del Registro índice, se asemeja al par de 
registros HL. Veremos la di-ferencia cuando hablemos del 
direccionamiento indexado. 


2.6 REGISTROS INTERRUPT/REFRESH 
Estos 2 registros corresponden a la CU. 

I - o bien registro Interrupt (ingl. interrupt: interrupción). 

Si tiene lugar una interrupción; es decir, una interrupción 
del programa, este registro de 8 bits contiene la parte 
superior de la dirección a la cual ha de realizarse la 
bi-furcación. La parte interior viene suministrada por el 
elemento del ordenador que ha ocasionado la interrupción. 


R - o bien registro Re-fresh (ingl. retresh: re+resco) 

Este registro es utilizado por el Hardware como contador, con 
el tin de re-frescar, a intervalos regulares, el contenido de 
la memoria dinámica. Con ello se impide que se pierdan las 
intormaciones almacenadas. La pérdida de datos se impide 
mediante la continua recarga del mismo contenido de la 
memoria. 


La CPU ejecuta el comando de la siguiente manera: 

En primer lugar lee el Byte en la dirección indicada por el PC, 
aumentando el apuntador del mismo en 1; es decir, seríalando ahora 
el byte siguiente. El Byte leído se interpreta como comando. A 
continuatión, se procede a la lectura eventual de los datos 
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CAPITULO III: LA SENTENCIA DE COMANDOS DEL Z80 


3.1 INTRODUCCION: ENTRADA DE PROGRAMAS EN LENGUAJE MAQUINA 


Para poder comenzar a probar comandos con el Z80, deberemos en 
primer lugar, saber de qué manera se introduce y almacena un 
programa en lenguaje máquina, partiendo del BASIC.De la misma 
manera que a cada número de línea le corresponde un comando BASIC; 
en lenguaje máquina, a cada comando le corresponde una dirección. 


BASIC 


LENGUAJE 

MAQUINA 


N. Línea 

Comando 

Dirección 

Comando 

Código 

9 

HL=HL+1 

S<A009 

INC HL 

8(23 

10 

RETURN 

ScAOOA 

RET 

8cC9 


- En BASIC, a cada número de línea le corresponde un comando. 

- En CODIGO MAQUINA, a cada comando le corresponde una dirección. 

Asi pues, un programa máquina es una sucesión de códigos de 
comando, situados en la memoria en direcciones sucesivas. 

Mediante el BASIC, y con ayuda de los comandos tPOKEt, podemos 
almacenar los códigos en las correspondientes direcciones. De este 
modo, los programas son llamados con el comando tCALL Dirección*, 
donde la dirección se refiere a la dirección inicial del programa 
máquina, que corresponde al espacio de memoria que contiene el 
primer código máquina. Para evitar equivocaciones, debemos en 
primer lugar reservar el espacio necesario para nuestro programa, 
con el comando MEMORY. A través de tMEMORY Í!9FFF» reservamos el 
ámbito de direcciones de !(A000 hasta ScAB7F, con un tamaño de &680 
Bytes (aproximadamente 3K), suficiente para nuestro programa en 
lenguaje máquina. 




44 


El libro del Lenguaje Máquina del CPC 


Un ejemplo de programa BASIC para cargar programas en lenguaje 
máquina es el siguiente: 

10 MEMORY i<9FFF 

20 FüR I=Dirección inicial TO Dirección Final 
30 READ A 
40 POKE I,A 
50 NEXT I 

60 DATA . 

70 DATA . 


Las líneas DATA contienen los códigos que componen el programa 
máquina. La dirección final (V=Variable; en lo sucesivo 
utilizaremos siempre esta abreviatura detrás de aquellas 
expresiones que representen variables), será naturalmente superior 
a S(9FFF, y la dirección inicial (V), será menor que !<AB80. 

La llamada del programa se efectúa mediante «CALL Dirección 
inicial!. 

En general utilizaremos &AOOO como dirección inicial. La dirección 
final (V) resulta de sumar la longitud total del programa a la 
dirección inicial, menos 1. 

La longitud del programa corresponde al número de entradas en las 
1ineas DATA. 

Para la entrada de programas pequeños es práctico el siguiente 
programa BASIC: 

10 CLS 

20 MEMORY S<9FFF 

30 LOCATE 10,10: INPUT "dirección inicial"; ADR 
40 IF ADR < {<A000 OR ADR > ScABFF THEN 30 
50 PRINT 

60 PRINT HEX$(ADR,4);":"; 

70 INPUT VALOR! 
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80 IF VAL0R*="" THEN END 
90 VALOR=VAL(".!i"+VALOR») 

100 ADR=ADR+1 

lio IF ADR > !-<AB7F THEN PRINT "Memoria llena": END 
120 GOTO 60 

Introduzca los códigos hexadecimales, y el programa resolverá el 
*P0KE*. No será necesario entrar el signo hexadecimal (Íí) para la 
dirección inicial. Si quiere terminar el programa , pulse ENTER. 

Ahora que hemos aprendido a entrar programas en lenguaje máquina, 
veamos los comandos del Z80. 

Observación: En las aclaraciones de comandos trabajaremos a menudo 
con analogías de los comandos en BASIC. Para ello, nos 
imaginaremos un registro en BASIC como una variable con el mismo 
nombre (por ejemplo el registro HL del lenguaje máquina, 
corresponde a la variable HL en BASIC). 

Los comandos del Z80 se subdividen en 5 grupos: 

1. Transferencia de datos 

2. Tratamiento de datos y comparaciones 

3. Saltos 

4. Comandos de control 

5. Entrada y salida. 


3.2 TRANSFERENCIA DE DATOS 


Estos comandos se utilizan para transferir o enviar datos. La 
transferencia puede realizarse de: 


a) Registro a registro. 
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Ello supone una designación en BASIC; como por ejemplo, A=B, o 
SP=HL. El comando en lenguaje maquina tiene el -formato: LD A,B 

(LD ingl. load: carga). 

b) Registro a posición de memoria 

En la transferencia de datos del registro a la posición de 
memoria, el comando en BASIC »POKE Dirección de memoria. 
Variable!, por ejemplo *POKE SíAOOO,HL» corresponde al comando 
máquina LD (í(AOOO),HL. 

c> Posición de memoria a registro. 

La transferencia de datos desde la memoria a un registro, por 
ejemplo LD H, (ÍíAOOS), corresponde al comando BASIC *H=PEEK 
(S<A005)». 


3.3 TRATAMIENTO DE DATOS Y COMPARACIONES 

Los comandos para el tratamiento de datos podemos subdividirlas 
nuevamente en 5 grupos: 

- Operaciones aritméticas (por ejemplo ADición, SUBstracción) 

- Operaciones lógicas (por ejemplo AND, OR) 

- Comandos contadores (INCrementar, DECrementar) 

- Manipulación de Bits (SET, RESet) 

- Intercambios y desplazamientos de Bits (Rotate = rotar, Shift = 
desplazar). 


Durante la ejecución de estos comandos se modifican los contenidos 
de los registros o de la memoria (en RAM). Muchos de estos 
comandos son similares a los correspondientes comandos BASIC: 
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Ensamblador 


BASIC 


SUB A,B (SUBstracción) 
ADD HL,BC (ADDición) 

AND C 
OR Í<HL 


A=A-B 
HL=HL+BC 
A=A AND C 
A=A OR PEEK(HL) 


Las comparaciones se realizan, o bien de bits individuales en el 
registro, o en las posiciones de memoria (comando BIT), o bien se 
comparan los contenidos de los registros o de la memoria con el 
ACU (comando CP=compare). Según los resultados de estas 
comparaciones, la ALU activará o desactivará cada uno de los -flags 
en el registro F. 


3.4 BIFURCACIONES 

Con ayuda de estos comandos es posible incluir bifurcaciones en 
programas máquina. 

Se distinguen tres tipos de bifurcación: 

- bifurcación directa a una dirección de 16-bits (JP=Jump) 

- bifurcación relat'iva a la dirección actual (JR=Jump relativ) 

- bifurcaciones a subprogramas (CALL con retorno por RET) 

Una bifurcación es condicional cuando la decisión de si debe 
efectuarse la misma depende del estado de un Flag. 

Un salto condicional, es decir, aquel que depende del estado de un 
Flag, sería por ejemplo JR NZ,$-6>A000. 

Analogías: 

Ensamblador BASIC 

JP 
CALL 
RET 
JR 


SOTO 

GOSUB 

RETURN 
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3.5 COMANDOS DE CONTROL 


Con estos comandos puede interrumpirse un programa. El control con 
interrupciones también es posible con estos comandos. 


3.6 COMANDOS DE ENTRADA/SALIDA (Input/Output) 


Los comandos I/O sirven para la comunicación con los periféricos 
de entrada y salida. Dependiendo de la dirección del puerto 1/0 
seleccionado se realizan diferentes tareas mediante estos 
comandos. Los circuitos integrados que se seleccionan 
frecuentemente a través de comandos I/O son p.ej.: 


PPI (Programmable Peripheral Interface) 

PSG (Programmable Sound Generator) 

CRIC (Cathode Ray Tube Controller) y así los dispositivos 
periféricos: teclado, altavoz, monitor, impresora y dispositivo de 
cassette. 
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pertenecientes al comando (el PC se incrementa nuevamente). Acto 
seguido se ejecuta el comando y el proceso comienza nuevamente. 


Ahora que ya conocemos la CPU del ZBO, pasaremos a ocuparnos de 
los verdaderos comandos de la máquina. 
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CAPITULO IV: LOS COMANDOS 

4.1 COMANDOS DE TRANSFERENCIA DE 8-BITS 


Todos los comandos de transíerencia de este tipo se representan 
por el comando de carga LD (load). 

Un comando de carga, presenta el -formato siguiente: 

LD Destino,Origen 

En los comandos de transferencia de 8-bits, se mueven 8-bits desde 
el origen al destino. Como ejemplo de estos comandos le 
presentaremos los tipos de direccionamiento del Z80. 

Cada comando máquina se compone fundamentalmente de un código de 
(Opcode), que puede continuarse con un campo de operando o de 
dirección. El Opcode determina qué operación debe ser efectuada. 
Frecuentemente, un Opcode contiene Bits que son utilizados como 
indicadores de un registro. El realidad, estos Bits no pertenecen 
al Opcode. Para simplificar el ejemplo, contaremos estos 
indicadores eventuales como pertenecientes al Opcode. En algunos 
comandos, el Opcode viene seguido de Bytes de datos y de 
dirección. Además existen asimismo comandos cuyo Opcode tiene 2 
bytes. De este modo, un comando puede llegar a tener una longitud 
de 1 a 4 bytes. 


U Byte 
BefehI 



Opcode 

2 ByteJ 

Opcode 

BefehI I 

Oaten/Adresse 


Daten/Adresse 


1 Byte 
Befeht 


DIBUJO PAGINA 49 

BefehI = Comando 
Daten = Datos 
Adresse = Dirección 

> 3 Byte 
BefehI 
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Para interpretar los datos o direcciones que siguen a un comando, 
es necesario conocer los di-ferentes tipos de direccionamiento. 


Direccionamiento inmediato (Inmediatly Adressing) 

(Ingl. inmediatly; inmediato). Este es el direccionamiento más 
sencillo. 

Formato; 

LD registro,datos 

En este comando "registro" representa un registro (A, B, C, D, E, 
H o L) y "datos" corresponde a un número de 8-bits; es decir, el 
registro dado se carga con la constante "inmediata" que le sigue. 
Una constante de este tipo también se denomina Literal. El 
direccionamiento Inmediato se representa en el esquema 3. Al 
Opcode de 8-bits le sigue un literal (constante) de 8 - ó 16-bits. 

Ejemplo; 


LD C,?<7F 


BASIC; C=S<7F 

(significa; cargar registro C con !(7F) 
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Inmediato 


Implícito 

Absoluto 


indexado 


Indirecto 


Bytel 

Byte 2~] low Bv 

} Constante 
Byte3j highBy 


Bytel 


Byte 1 

Byte 2l low By 
Byte3J^‘^'‘- highBy 

Bytell 

^ Opcode 
Byte 2j 

Byte 3 


Byte 1 

Dib.3 4.1 


Opcode 

Literal 

Literal 

Opcode !Reg.Code 

Opcode 
_1 6 Bit 

Dirección 


Opcode 

Opcode 

Distancia 

¡Literal/Dirección 

Opcode 


Direccionamiento implícito y de registro (ingl.: Implied Register 
Adressing) 


Los comandos que trabajan exclusivamente con registros utilizan el 
direccionamiento implícito (ingl.: Implied: implícito). 

Formato: 


LD Reg,Reg 
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Traslada el contenido del registro origen al registro destino. 
Pueden utilizarse los registros A, B, C, D, E, H o L. 

La denominación de este tipo de direccionamiento resulta del hecho 
de que el operando (es decir ambos registros afectados) no se 
indica expresamente. En realidad el Opcode de la orden contiene 
los registros afectadas, (los implica). 

El código de operación de este comando en formato binario es: 
OIDDDOOO 

Cada una de las letras D y 0 corresponden a un bit. Las tres "D" 
representan el registro destino y las tres "0", el registro 
origen. El código para los registros es: 

A-IH E-Oll 

B-000 H-lOO 

C-001 L-101 

D-101 

Ejemplo: LD B,C = 01 000 001 = 8<41 

LD B C 

Con ello es posible representar los comandos direccionados 
implícitamente como un código de operación de 1 byte. Por este 
motivo, es muy reducida la duración de su ejecución. 

Ejemplo: 

LD A,B BASIC: A=B 

Significado; transferencia del contenido de B a A, es decir carga 
el registro A con el contenido de B. 

Zilog Inc. (el inventor del Z80) califica el anterior tipo de 
direccionamiento como direccionamiento de registro y discrepa en 
la denominación del direccionamiento implícito. Según esto, 
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solamente serían direccionados implícitamente los comandos LD 
I,Ai LD R,A; LD A,R y LD A,I. Nosotros no haremos no obstante 
tal diferencia, y utilizaremos ambos conceptos.; direccionamiento 
implícito y direccionamiento de registro. 


Direccionamiento absoluto o "externo" (External Adressing) 

(Ingl.!external=externo) 

Como direccionamiento absoluto se describe el proceso de extraer 
datos de la memoria, o de almacenarlos en ella. Mediante este 
procedimiento, la dirección de 16-bits de la posición de memoria 
se indica por completo (la dirección "absoluta"). 

Formato: 

LD (Dir),reg o bien LD Reg,(Dir) 

(Dir: es la dirección de la posición de memoria) 

El registro dado se carga con el contenido de la posición de 
memoria indicada y viceversa. Del esquema 3, puede deducirse que 
la dirección sigue al código de operación. El direccionamiento 
absoluto requiere 3 bytes, por lo que la ejecución de los comandos 
de esta clase resulta relativamente larga. 

Ejemplo: 

LD A, (Í<BF93) BASIC; A=PEEK(!<BF93) 

LD (Í<A001),A BASIC; POKE S(A001,A 


Direccionamiento Indexado (Indexed Adressing) 

(Ingl.¡Índex:índice) 

En el direccionamiento indexado no queda indicada la dirección 
absoluta de la posición de memoria, sino que se calcula a partir 
del contenido de un registro índice y del desplazamiento indicado. 
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Formato: 

LD Reg, (J)f+des) o bien LD (D(+des),Reg 

LD Reg,(lY+des) o bien LD (IY+des),Reg 

tdes=desplazaffliento, IX ó lY son registros de índice) 

Carga del registro de-finido con la posición de memoria que posee 
la siguiente dirección (y viceversa): La dirección resulta del 
contenido del registro índice y del desplazamiento indicados. 




Direccionamiento indexado 
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Los comandos índexados poseen un código de operación de 2-bytes, 
al que sigue el desplazamiento indicado. El primer byte del código 
de operación es: 

t(DD - Si se re-fiere al registro IX 
?<FD - Si se re-fiere al registro lY 

Los bytes restantes del código son idénticos, independientemente 
de si se refiere al registro IX o al registro lY. La técnica del 
direccionamiento indexado se utiliza para acceder consecutivamente 
a los elementos de un bloque de datos. El desplazamiento puede ser 
positivo o negativo; es decir, el byte del desplazamiento se 
indica como complemento de dos. 

Ejemplo: 

LD E, <IX■^!<32) BASIC: E=PEEK (IX+?<32) 

LD (IY+S(12),A BASIC: POKE IY-hM2,A 

Direccionamiento Indirecto (Registro indirecto) 

Este tipo de direccionamiento se asemeja al direccionamiento 
indexado y al absoluto, la única diferencia es que en este caso la 
posición de memoria se direcciona mediante el contenido de uno de 
los pares de-registros HL, BC o DE. 

Formato: 

LD reg,(prs) o bien LD (prs),reg 

(prs es uno de los pares de registros HL, BC o DE) 

Carga el registro con el contenido de la posición de memoria 
direccionada mediante el par de registros HL, BC o DE. 

Esta técnica de direccionamiento presenta, frente al 
direccionamiento indexado y al absoluto, la ventaja de que sólo 
necesita comandos de 1 byte de longitud; es decir, que el registro 
indicado y el par de registros HL, BC o DE están contenidos en el 
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código de operación, no necesitando indicación expresa. De este 
modo el comando es más rápido, o-freciendo asimismo la posibilidad 
de acceder a las 64 K. 

Ejemplo: 

LD B,(HL) BASIC: B=PEEK (HL) 

LD (BC),A BASIC: POKE BC,A 


Con esto hemos estudiado ya todos los tipos de direccionamiento 
que aparecen en los comandos de transferencia de 8-bits. En el 
curso de este capítulo aCtn daremos a conocer algunos otros tipos 
de direccionamiento, así como también aplicaremos los ya conocidos 
a otros comandos. En el anexo encontrará unas tablas, donde verá 
todos los, comandos, clasificados por funciones (transferencia, 
bifurcación, etc.), y por tipos de direccionamiento. En estas 
tablas podrá consultar los códigos de operación de todos los 
comandos. A continuación queremos unir los comandos de carga de 8- 
bits nuevamente. En el anexo encontrarán una tabla de las 
abreviaciones utilizadas. 
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Ejercicio: 

Acaban de aprender los comandos de carga de 8 bits. Como 
aplicación modi-ficaremos algunas posiciones de memoria del sistema 
operativo con la ayuda de estos comandos. 

Veamos en primer lugar la posición de memoria S<B289 (el 664: ?<B72A 
/ 6128: !<B72A). En esta dirección se almacena la primera columna 

izquierda de la ventana actual de la pantalla, la cual puede ser 
confeccionada desde el BASIC con el comando *MINDOM 10,80,1,25*. 
Queremos inicializar el ancho de la pantalla en su porción 
izquierda en 10. Desde el BASIC lo logramos con *W1ND0U 
10,80,1,25*. También existe la posibilidad de grabar directamente 
el valor deseado en la posición de memoria í(B289 (664; Í<B72A / 
6128: {(B72A) mediante el comando *P0KE*. 

Probemos entonces con *P0KE &B289,10* (664; !<B72A,10 / 6128: 

!<B72A) y la columna de pantalla de la izquierda es la décima. 
Intenten confeccionar el comando BASIC 

*P0KE SiB289,10* (664: S(B72A, 10 / 6128; íiB72A,10). 

en lenguaje máquina. Finalicen su programa con el comando RET 
(código S<C9). 

Discusión de la solución 

Analicemos en primer lugar el ejercicio; 

queremos cargar una posición de memoria (dirección Í<B289 (664: 

Í(B72A/ 6128: !<B72A)) con un valor de un byte, es decir un número 

entre 0 y 255. 

Dado que el valor es un número de 1 byte, utilizamos un comando de 
carga de 8 bits. 

Ahora existen diferentes soluciones, que dependen de la modalidad 
de direccionamiento. 

Para cargar una posición de memoria con un byte se debe determinar 
naturalmente previamente la dirección de la posición de memoria 
deseada. La posibilidad más simple es el direccionamiento absoluto 
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en el cual se indica la dirección completa: 

LD (!<B289),A (Direccionamiento absoluto) para CPC 464 

LD (!¡B72ft),A (Direccionamiento absoluto) para CPC 664 

LD (?iB72A),A (Direccionamiento absoluto) para CPC 6128 


Es decir: carga la posición de memoria &B289 (664: S(B72A/ 6128: 

!<B72A) con el valor contenido en el ACU. Esto signi-fica que 
previamente el ACU debe cargarse con el valor deseado. 

LD A,10 (Direccionamiento inmediato) 

Ambos comandos ejecutados consecutivamente llevan al resultado 
deseado. 


LD A,10 

LD (S<B289),A (664: LD (Í(B72A),A / 

6128: LD (SiB72A),A) 

RET 


El comando RET debe ejecutarse al final de cada programa máquina, 
que provoca un retorno al BASIC. 


Hasta ahora hemos presentado el programa máquina únicamente en 
ensamblador, es decir en forma simbólica. Para que el procesador 
pueda ejecutar nuestros comandos, deben traducirse los mismos 
previamente a números. De las listas de comando presentadas o bien 
de las tablas contenidas en el final de este libro obtenemos para 
el comando de carga de 8 bits, LD A,10 con direccionamiento 
inmediato el código Si3E, 10, donde el segundo código representa el 
valor deseado. Para el comando con direccionamiento absoluto LD 
(S<B289),A (664: LD (!<B72A),A / 6128: LD (!<B72A),A) obtenemos 
í<32,l!<89,S(B2 (664: íi32,í<2A,í<B7 / 6128: Í<32,!!<2A,Í<B7). También aquí 
los 2 últimos códigos representan la dirección indicada. Tengan en 
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cuenta que en primer lugar se indica el Low Byte y a continuación 
el High Byte. 

El código para RET es, como ya hemos indicado, 8<C9. 

De estos códigos se compone la línea DftTA del cargador BASIC en el 
capítulo 3: 

DATA ?<3E, 10,S<32,?<89,3<B2,!<C9 para CPC 464 
DATA ?<3E, 10,?<32,?<2A,5<B7,?<C9 para CPC 664 
DATA !(3E, 10,!<32,8<2A,?íB7,?íC9 para CPC 6128 

Nuestro programa tiene una longitud de 6 bytes, es decir el bucle 
FOR-NEXT tiene que ejecutarse desde SíAOOO hasta ?<A005. Después de 
ejecutar con *RUN» el cargador BASIC, nuestro primer programa 
máquina se encuentra en la memoria. Puede arrancar su primer 
programa introduciendo ÍCALL !(A000*. Si ha realizado todo 
correctamente, el cursor se debería desplazar inmediatamente a la 
décima columna de la pantalla. Si se quiere alterar el valor de la 
columna izquierda, solamente debe modi-ficarse el segundo número de 
la línea DATA (el "10") grabando el programa nuevamente en la 
memoria con UtRUN* y llamarlo mediante itCALL íiAOOO*. 

Prueben asimismo las siguientes direcciones: 

464 664 6128 

!íB288 ?<B729 ?íB729 línea superior 

!íB28A !íB72B ?;B72B columna derecha 

?<B28B Í¡B72C J;B72C línea in-ferior 


4.2 COMANDOS DE TRANSFERENCIA DE 16 BITS 


Los comandos de carga de 16 bits presentan el formato general: 


LD Destino,Origen 
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Sin embargo, aquí se trans-fieren 16 bits. Mediante estos comandas 
se activan los pares de registros BC, DE, HL, SP, IX e lY. 


Direccionamiento inmediato 

Como aquí solamente se cargan registros de 16 bits, la constante 
que sigue al código de operación deberá tener una longitud de 16 
bits. De este modo, los 2 bytes siguientes al código de operación, 
contienen el Low-byte y el High-byte de la constante (ien este 
orden!). En contraposición al direccionamiento inmediato con 
constantes de 1 byte, esta técnica recibe el nombre de 
direccionamiento inmediato extendido (ingl. Inmediatly extended). 

Formato; 

LD x,datDS-16 

(x! uno de los registros de 16 bits SP,BC,DE,HL,IX,lY) 

(datDs-16: constante de 16 bits) 

Mediante este comando, el registro x se carga con la constante 
datos-16. 

E„iemplo: 

LD HL,!<C000 BASIC; HL=í<COOO 


Direccionamiento implícito 

Para los comandos de carga de 16 bits sólo existen 3 comandos de 
este tipo, y todos ellos a-fectan al registro SP; 

LD SP,HL LD SP,IX LD SP,lY 

Estos comandos signi'fican; 

Carga del apuntador de la pila con el contenido del registro HL, 
IX ó lY. 
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Analogía en BASIC; 

SP=HL SP=IX SP=IY 

Direccionamiento Absoluto 

El direccionamiento absoluto en los comandos de 16 bits debemos 
explicarlo con mayor detalle; 

Formato; 

LD prs,(dir) o bien LD (dir),prs 

(prs: par de registros BL, DE, HL, SP, IX ó lY) 

Dado que dir señala una dirección, es decir direcciona un único 
byte y puesto que sin embargo prs representa un registro de 16 
bits, se utiliza la convención siguiente; se carga en primer lugar 
en el registro el Low-byte de la dirección Dir, y a continuación 
el High-byte de la dirección dir+1. 

Por ejemplo; LD HL, (?<AB80) significa; 

Registro L = Low-byte de la dirección ?<AB80 
Registro H = High-byte de la dirección ?<AB81 

En el comando inverso de la forma LD (dir),x; el low-byte se 
almacena en la correspondiente dirección (dir) y el High-byte en 
la dirección Dir+1. 

Por ejemplo; LD (!iCBOO),IX 

Dirección ¿CBOO = Low-byte de IX 
Dirección ííCBOl = High-byte de IX 

Un comando de este tipo corresponde por lo tanto a 2 comandos de 
carga de 8-bits. 

Comando de 16 bits Comando de S-bits 

LD BC, ÍS<FC05) corresponde LD C, (?<FC05) (Low-byte) 

LD B, (?<FC06) (High-byte) 
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Como ya sabemos, un número de 16 bits puede representarse a partir 
del Low-byte y del High-byte, de la siguiente -forma: 

Número=256*(High-Byte) + (Low-Byte) 

Por esto, la equivalencia en BASIC: 

Lenguaje máquina BASIC 

LD DE, (S(4000) DE=256*PEEK (?<4001)-hPEEK (?<4000) 

Utilizando el sistema hexadecimal, puede representarse: 

DE=VAL ("?<"-t-HEX$ (PEEK (!<4001)) -^HEXá (PEER («<4000)) ) 

Para codi-ficar en BASIC el comando inverso; por ejemplo LD 
(«<6800), lY se necesitan 2 comandos: 

POKE «<6800, lY-lNT (I Y/256) *256 (Low-byte) 

POKE «<6801, INT(IY/256) (High-byte) 

En caso de que estas analogías no le sean su-ficientemente claras, 
repase el capítulo relativo a la representación de números. 
Coloque entonces números para cada DE e lY, y luego irealice el 
cálculo real!. 

Las listas de comandos de este libro han sido proporcionadas por 
la empresa Zilog. 

Dan una vista general sobre todos los comandos disponibles. Para 
cada grupo de comandos imprimimos la tabla correspondiente. 
Utilicen las tablas para buscar los Op-Code necesarios para los 
ejercicios. 
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Ejercicio! 

Antes de continuar con la explicación de comandos queremos aplicar 
los aprendidos hasta ahora. Como saben, la memoria de pantalla del 
CPC comienza en la dirección SíCOOO. En esta área, cada S bits (1 
byte) correspohden a 8 puntos consecutivos (en MODE 2). La 
dirección !<C000 está asignada a los primeros 8 puntos, comenzando 
en la esquina superior izquierda de la pantalla. Los 8 puntos 
inferiores (1 byte) están almacenados en dirección !<C800, los 
siguientes de la línea inferior en dirección !<D000 etc. (en 
intervalos de ?i800). Introduzca: 

10 POKE ?<C000,?<FF 
20 POKE ?<C800,{<FF 
30 POKE 8íD000,!<FF 
40 POKE 8<D800,?<FF 
50 POKE !<E000,í<FF 
60 POKE 8<E800,Í<FF 
70 POKE ?<FO00,?<FF 
80 POKE $<F800,!<FF 
MODE 2 
RUN 

Como pueden observar, el cuadrado superior izquierdo se ha 
rellenado con el color actualmente definido. 

(!<FF=8<X11111111=8 puntos activados) 

Ahora debe traducir este programa a lenguaje máquina mediante los 
comandos recién estudiados. Finalice su programa máquina con RET 
(!<C9). 

Discusión de la solución para 
el programa máquina a confeccionar. 

En principio necesitamos un comando que cargue una posición de 
memoria con un valor (=P0KE). Para ello podemos utilizar los 
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comandos con direccionamiento indirecto, indexado y absoluto (vean 
definición). Para traducir exactamente nuestro ejemplo BASIC, 
elegimos el direccionamiento absoluto, es decir indicamos la 
dirección completa, como en el programa BASIC. Naturalmente 
también es posible almacenar la dirección en un registro 
utilizando a continuación el direccionamiento indirecto o 
índexado. 

Ejemplo: 

BASIC: HL=!<COOO: POKE HL,ÍíFF 
Lenguaje máquina: LD HL,!<COOO LD (HL),S(FF 

Dado que con los comandos de 16 bits se almacenan cada vez 
posiciones consecutivas de memoria, utilizamos el comando de 
bits. 

LD (dir),A 

Antes de la ejecución de este comando debemos almacenar el valor 
S(FF en el ACU, utilizando para ello el direccionamiento inmediato: 

LD A,S<FF 

Nuestro programa tendrá entonces el siguiente aspecto: 

LD A,!<FF 
LD (S<C000),A 
LD (Í<C800),A 
LD (Í<DOOO),A 
LD (Í<D800),A 
LD (í<EOOO),A 
LD (&E800>,A 
LD (S<F000),A 
LD (S<F800),A 
RET 


C < 00 
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Ahora buscamos los códigos para los correspondientes comandos: 

LD A,datos: &3E,co 

LD (dir),A: 8<32,dl,dh :Low, High 

RET : ?<C9 

Así se convierten las líneas DATA de nuestro cargador de BASIC del 
capítulo 3.1 de la siguiente forma: 

10 MEMORY ?<9FFF 

20 FOR i=8<A000 TO !<A01A 

30 READ a 

40 POKE i,a 

50 NEXT i 

60 END 

65 DATA S<3E,Í<FF,Í<32,8<00,Í<CO,?<32,?<00,«<C8 
70 DATA !<32,?<00,!<D0,Í<32,?<00,8<D8,S<32,!<00,«<E8 
80 DATA 8<32,J<00,?<E8,Í<32,8(00,Í<F0,8<32,Í<00,8<F8 
90 DATA Í(C9 

Queremos almacenar el programa en dirección !<A000 (=dirección 
inicial (V)). El programa tiene una longitud de 27 bytes. La 
dirección -final será entonces 8<A000 + 27 - 1 = ?<A01A. De aquí 

obtenemos la línea 20: 

20 FOR i=í<A000 TO S<A01A 

Después de almacenar a través de RUN el programa máquina, será 
"pokeado" automáticamente. Podemos entrar ahora »M0DE 2» y <:CALL 
í<A000» comenzando la ejecución del programa. Como podrán observar, 
el color puede verse en el campo superior izquierdo de la 
pantalla. El programa pueden asimismo cargarlo directamente. Para 
ello, comiencen la carga directa con la dirección inicial 8 íA 000, 
seguido por los códigos correspondientes (p.ej. 8<3E, 8<FF, etc.). 
Este ha sido nuestro primer programa máquina. Ustedes pueden ahora 
modi-ficarlo o mejorarlo con los nuevos comandos que se expliquen. 
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4.3 COMANDOS DEL STACK POINTER (PILA) 

Para comprender mejor el modo de -funcionamiento de los 
apuntadores, es necesario saber qué ocurre en el interior del Z80 
cuando se bi-furca a un subprograma. El comando Ensamblador 
necesario para ello es: CALL dirección. El problema básico 
consiste en que la CPU ha de "memorizar" la dirección de los 
comandos siguientes a la llamada, ya que cuando retorne del 
subprograma (RET), debe continuar en este punto la ejecución del 
programa principal. 


DIBUJO PAGINA 68 


CALL adr 



adr. 


Siguiente comando 



Subrutina 

rÉt 


Dib. 5 Llamada Subrutina 

Dado que los registros son importantes para otras operaciones 
importantes, las direcciones de retorno han de memorizarse fuera 
de la CPU, es decir, en la RAM. Siguiendo este procedimiento, sin 
embargo, sólo podría memorizarse una Cínica dirección de retorno. 
Esto significa que no seria posible un anidamiento de 
subprogramas. Por este motivo, se ha reservado un espacio de la 
RAM para esta operación, que se denomina STACK o PILA. Podemos 
imaginarnos esta pila, como un apilamiento de platos. 

Una dirección de retorno se registrará siendo anotada en un plato. 
El plato asi "direccionado”, se coloca encima de la pila de 
platos. De este modo pueden tener lugar muchas llamadas a 
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subprogramas, aumentando simplemente el apilamiento. Cuando se 
realiza un retorno, se quita el plato superior de la pila y se 
bi-furca en la dirección que lleva escrfta. De este modo se 
suceden, uno a continuación del otro, los saltos hacia atrás, 
hasta que la pila de platos queda deshecha; es decir hasta que se 
llega nuevamente al programa principal. Es importante remarcar que 
el último plato colocado en la pila será siempre el primero que se 
extraiga (de lo contrario, toda la pila se vendría abajo). 

Puesto que en el ordenador no son platos los que se apilan, 
deberá utilizarse un registro del Z80 como "medidor de la cima" de 
la pila. Este registro guarda siempre en memoria la dirección de 
la cima de la pila. Se denomina Stack Pointer (SP). De todos modos, 
nuestra pila en el ordenador "cuelga" del techo*, es decir, el 
primer plato es colocado en la dirección más alta de la pila y el 
último en la dirección maí. baja. El Stack Pointer (la pila) se 
encuentra en la dirección S<BPFF en el CPC. 

Con todo lo expuesto, la ejecución de comandos CftLL sería: 

Sección del Stack Pointer: 


Posición inicial: 


Pila Í<BFF4 : 
ícBFF3 : 
Í<BFF2 : 
ííBFFl : 
ííBFFO : 
«(BFEF : 


(entrada anterior) 

(entrada anterior) 

(entrada anterior) 

(última entrada) 

(lugar para nueva entrada) 
(lugar para nueva entrada) 


Stack Pointer SP: Í<BFF1 


El registro SP indica la última entrada en el Stack. Supongamos 
que en la ejecución de un programa, el procesador encuentra el 
comando CALL !<B267 en la dirección {<780. 


?<780 CALL «<B267 
S(783 siguiente comando 
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Después de leer el comando el PC (Program Counter) se encuentra en 
S<783. Esta es la dirección de retorno que ha de registrarse. La 
dirección se coloca en el Stack en la -forma de Low-byte High-byte. 
El registro SP se decrementa, se almacena el High-byte, vuelve a 
decrementar el SP y se almacena el Low-byte. A continuación se 
carga el registro PC con la dirección inicial del subprograma 
(í<B267), donde se continúa la ejecución del programa. 

Resulta entonces la serie siguiente: 


Pila: ?<BFF0 «<07 

8<BFEF ?<83 : (última entrada) 


SP: «<BFEF 

Como pueden observar el apuntador SP indica la última entrada. 

Con el comando RET, el proceso se invierte: 

El byte de la posición de memoria indicada por el SP, se carga 
como Low-byte en el PC. Se incrementa en 1 el SP y se carga el 
High-byte de la dirección de retorno en el PC. A continuación se 
incrementa nuevamente en 1 el SP, indicando entonces la dirección 
de retorno actual en la pila. La ejecución del programa continúa 
en la posición indicada por el PC, es decir la dirección de 
retorno correcta. 


Pila: !<BFF1 ... SP: S<BFF1 

8<BFF0 «<07 

S<BFEF «<83 


Los procesos descritos tienen lugar automáticamente en el Z80, 
siempre que se utiliza un comando CALL o RET. Esto determina que 
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la sucesión en la pila sea siempre correcta y que el SP indique 
siempre la posición correcta. Si se modifica el SP directamente a 
través del programa, puede producirse un desorden en la serie con 
el consiguiente bloqueo del ordenador, por esto es muy importante 
utilizar con sumo cuidado los comandos LD SP,x. 

E>!iste también la posibilidad de colocar datos en la pila y 
llamarlos desde la misma. Para ello se utilizan los comandos: 

PUSH (colocar en el Stack) 

y 

POP (extraer del Stack) 

El comando PUSH tiene un funcionamiento análogo al del comando 
CALL. Los datos que han de almacenarse se graban en la pila una 
vez decrementado el SP. Con POP se procede a la lectura de los 
datos y el SP se incrementa automáticamente. La CPU se hace cargo 
en este caso de varias operaciones. Con PUSH y POP pueden 
"apilarse" varios pares de registros de 16-bits, a excepción del 
propio SP. 

Formato: 

PUSH X POP X 

(x:AF, BC, DE, HL, IX, lY) 

Dado que el acumulador es un registro de 8 bits así como el flag, 
cuando estos registros quieren almacenarse en el Stack se tratan 
conjuntamente. 

La técnica del almacenamiento intermedio en el Stack sólo tien.e 
sentido si los registros apropiados no son suficientes. 

Ejemplo: 

HL contiene el primer sumando 

BC contiene el segundo sumando 
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Ahora llamamos a una subrutina para e-fectuar la operación de sumar 
HL y BC. El resultado de la suma se almacena en HL. Si después de 
la operación -fuera necesario saber el contenido original del 
primer sumando, éste debería guardarse previamente en el Stack. 

LD HL,sumando-1 
LD BC,suraando-2 
PUSH HL 
CALL SUMAR 


POP HL 


Si se necesita este sumando puede extraerse de la pila con el 
comando POP HL. 


Ha de tenerse en cuenta que el comando POP correspondiente a un 
comando PUSH, debe estar siempre en el mismo subprograma, de lo 
contrario los datos almacenados mediante PUSH se interpretan como 
dirección de retorno para el comando RET, lo que probablemente 
ocasionaría el bloqueo del ordenador. Los comandos PUSH y POP no 
poseen ningún comando BASIC análogo. En BASIC estos comandos 
deberían codi-ficarse: 

Ejemplo BASIC: 

PUSH AF BASIC: POKE SP-1,A : (Higti-byte) 

POKE SP-2,F 
SP=SP-2 


POP BC 


BASIC: BC=PEEK (SP) -hCSóIPEEK (SP-H ) 

SP=SP■^2 


Dado que ambos comandos (PUSH y POP) utilizan el registro SP como 
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indicador de dirección, ambos se cuentan como direccionamiento 
indirecto. 

Ejempl o! 

PUSH HL SP=?<BE05 

HL=!<1234 

Después de la ejecución: dirección ?<BE04:Sil2 

dirección S<BE03:?<34 


SP = ?<BE03 
HL = ?!l234 

Ejemplo: 

POP HL SP=?<BE03 

HL=?<FFFF 

Después de la ejecución: 

SP = S<BE05 
HL = !<1234 

La lista de comandos correspondientes la encontraré al final del 
capitulo 4.2: Comandos de carga de 16 bits. 


4.4 COMANDOS DE INTERCAMBIO 

Además de los comandos sencillos de transferencia de datos (LD), 
en el Z80 existe otro tipo de comando que intercambia el contenido 
de dos áreas. Estos comandos se representan por EX (ingl. 
exchange:intercambiar). 

El comando de este tipo, EX DE,HL intercambia por ejemplo el 
contenido del registro DE con el del registro HL. El comando EX 
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con direccionamiento indirecto, intercambia el contenido de los 
registros HL, IX e lY con el elemento superior de la pila (sin 
alterar el SP). 

Formato: 

EX SP,í: 

HL, IX o bien lY 

Existen asimismo otros comandos que intercambian los contenidos de 
las series de pares de registros. Como ya hemos mencionado, cada 
registro A, BC, DE, HL y F tiene su correspondiente registro A’, 
BC’, DE’, y F’. Sin embargo, sólo se trabaja a la vez con un par 
de registros. Si es necesario, no obstante pueden intercambiarse 
los contenidos de ambos pares de registros. 

El comando EX AF,AF’ intercambia el contenido del acumulador y del 
registro -flag con los correspondientes A’ y F’. El comando EXX 
intercambia los restantes pares de registros BC, DE y HL con BC’, 
DE’ y HL’. 

Estos comandos utilizan direccionamiento implícito. 

Ejemplo: 

EX DE,HL BASIC: ZWI=HL: HL=DE: DE=ZWI 

EX <SP),HL BASIC: ZWI=HL: HL=256»PEEK(SP+1)+PEEK(SP>: 

POKE SP+1,INT(ZWI/256): 

POKE SP,ZWI-INT(ZWI/256)«256 




Los Comandos 


75 


LISTA DE COMANDOS 



Notes: ® P’V nag in 0 if ihc resuU of BC'-I » 0. otherwisc P/V « l 
(2) / (lag »s I il A * tHL». otherwise Z * 0. 


I lag Notaliun: • = flag nül alKctcd. 0 * (lag lescl. 1 * flag \et. X * tlag is unknown. 
t * tlag is afTected according lo thc resuli of the operation. 
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4.5 COMANDOS DE TRANSFERENCIA Y BUSQUEDA DE BLOQUES 

A diferencia del comando LD que transfiere únicamente 162 bytes, 
los comandos de transferencia de bloques transfieren todo un 
bloque de datos. Este tipo de comandos es una particularidad del 
Z80. Por lo general no es posible disponer de estos comandos en 
los microprocesadores, pues son muy complejos de realizar para los 
constructores de ordenadores, pero son de gran utilidad para el 
programador, ya que aumentan la capacidad de rendimiento de un 
programa. 

Un bloque de datos se caracteriza por lo siguiente: 

- La dirección inicial y final del bloque se almacena en el 
registro HL. 

- La longitud del bloque en bytes se almacena en el registro 
BC (Byte Counter). 

Con estos 2 valores es posible definir bloques de hasta 64K de 
longitud, que comienzan en cualquier posición de memoria. Puesto 
que el bloque así definido ha de transferirse, se deberá dar 
previamente la dirección inicial o la dirección final del bloque a 
transferir, que se almacenará en DE. Una vez colocados estos datos 
en los registros, puede efectuarse el verdadero comando de 
transferencia de bloques. 

Existen cuatro comandos de transferencia de bloques: 

LDD, LDDR, LDI, LDIR 

Cada comando de transferencia de bloques decrementa el contador BC 
después de cada transferencia de 1 byte. Dos de los comandos, LDI 
y LDIR, incrementan los indicadores HL y DE, señalando entonces la 
dirección de origen y la dirección de destino del siguiente byte a 
transferir. 

Contrariamente a ello, LDD y LDDR decrementan los contadores; es 
decir el bloque se transfiere por así decirlo "comenzando por 
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arriba". Para estos comandos, HL y DE también deberán estar 
cargados al principio con la dirección de inicio, o bien, la 
dirección de destino del bloque. 

La R que aparece al -final del comando corresponde a Repeat 
(ingl.:repetir). Estos comandos se repiten de -forma automática 
hasta que BC=0; es decir, hasta que queda trans-ferido todo el 
bloque. Para cada comando en particular rige lo siguiente: 


LDI : Carga e (I)ncrementa 

Este comando trans-fiere un byte de la dirección HL a la dirección 
DE. A continuación, se decrementa BC. Los indicadores de dirección 
HL y DE se incrementan, de modo que todo queda dispuesto para una 
eventual continuación de la trans-ferencia. Para ello, se deberá 
saltar nuevamente a este comando. 


LDIR : Carga, incrementa y repite 

El proceso de transferencia se realiza de igual modo que en LDI. A 
continuación el PC apunta nuevamente,',de forma automática a este 
comando. Luego, se vuelve a ejecutar hasta que BC=0. Finalmente, 
continúa el programa con el comando siguiente. 


LDD ! Carga y (D)ecrementa 

Similar a LDI, sólo que aquí el bloque se transfiere comenzando 
por la dirección final; es decir, HL y DE se decrementan. Esta 
diferencia es importante cuando se entrecruzan el bloque de 
destino y el bloque de origen. Si se utilizase aquí un comando 
erróneo, en según que condiciones, se modificarían los datos del 
bloque original antes de haber sido transferidos. 
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I & FFFF 


Longitud 
Final 

Solapamiento 
Comienzo 



Final 

Bloque fuente 



Comienzo 


Bloque destino' 


CD 

3 

o 

t-J 


&0000 


Ejemplo paraLQQIR) 


Ejemplo para LDKR) 


Comandos de transferencia de bloque 


LDDR ; Carga, decrementa y repite 

Similar al comando LDD, sólo que aquí, al igual que en LDIR, 
repite el comando, hasta que todo el bloque queda transferido. 


se 
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Ejemplo: 

LDIR BASIC: 10 POKE DE,FEEK(HL) 

20 HL=HL+1 
30 DE=DE+1 
40 BC=BC-1 

50 IF BC O 0 THEN 10 

LDD BASIC: POKE DE,PEEK(HL) 

DE=DE-1: HL=HL-1: BC=BC-1 

Piense por sí mismo cómo sería la analogía en BASIC para LDDR y 
LDI. 

En el tamaño del programa BASIC, puede observarse que se trata de 
un comando de gran potencia. 

In-fluencia de los Flags: Cuando tras la ejecución, BC=0, entonces 
P/V=0. 

Los comandos Repeat LDDR y LDIR siempre activan los Flags P/V en 

1 . 


COMANDOS DE BUSQUEDA DE BLOQUE 

Con la ayuda de los comandos de búsqueda de bloque, un bloque de 
datos puede buscarse por el contenido de un determinado byte. El 
contenido buscado se almacena antes en el acumulador. Si durante 
la búsqueda, el comando encuentra un byte cuyo contenido es igual 
al contenido del acumulador, se activa el Flag Z y se detiene o 
bloquea la repetición de los comandos Repeat. Los registros se 
utilizan de la misma forma que en los comandos de transferencia de 
bloques. 

HL - Dirección inicial o final del bloque 
BC - Byte Counter: Longitud del bloque 
DE - No tiene función 

A - El acumulador contiene el byte a buscar. 
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CPIR compara en cada transferencia el contenido de la posición de 
memoria HL con el contenido del acumulador, ft continuación 
incrementa HL y decrementa BC. Si B=0, el flag P/V se desactiva 
con 0, de lo contrario toma el valor 1. Si en la comparación entre 
A y HL se presenta igualdad, se activa el flag Z, de lo contrario 
se desactiva el mismo flag. 

El flag S corresponde, como en CP, al séptimo bit del resultado de 
^a resta A-(HL). El carry no se influye. 

Existen 4 comandos de búsqueda de bloques; 

CPI, CPIR, CPD, CPR 

Su modo de funcionamiento corresponde al de cada comando de 
transferencia de bloque. 

Todos los comandos de bloque son comandos de 2 bytes y su primer 
byte de Opcode es StED. De igual modo que ocurre con los comandos 
de transferencia de bloques, con los comandos de búsqueda la 
programación se simplifica y se hace más rápida en muchos casos. 

La lista de comandos correspondiente a la transferencia de bloques 
y a la búsqueda de bloques se encuentra al final del presente 
capitulo. 

APLICACION 

Para comprender plenamente el comando LDDR, lo probaremos a 
continuación. Queremos desplazar el contenido de la pantalla en un 
carácter hacia la derecha. Dado que un byte corresponde 
exactamente al ancho de un carácter, hemos de desplazar el bloque 
desde í<C000 hasta $<FFFF por un byte hacia arriba. 

Confeccione para ello un programa máquina con la ayuda de los 
comandos de transferencia de bloques. 

( 

Solución: 

Analicemos en primer lugar nuestro problema: 

El bloque fuente se encuentra en el área IíCOOO - Í<FFFE. 
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Este bloque debe desplazarse en un byte hacia arriba, es decir al 
área ?<C001 - ?(FFFF. Ambos bloques al parecer se superponen. Dado 
que la dirección -final del bloque -fuente !<FFFE está superpuesta 
hemos de optar por el comando LDDR. 

Calculemos ahora los contenidos de registros HL, DE, BC. H1 
contendrá la dirección -final del bloque -fuente, en este ejemplo 
Í(FFFE. BC contiene la cantidad de bytes a desplazar que es ?<4000-l 
(el área de pantalla desde !<COOO hasta !<FFFF son !í 4000 bytes) 
entonces: BC=Si3FFF. DE contiene la dirección -final del bloque 
destino !<FFFF. 

De esta manera resulta el siguiente programa Assembler: 

UD HL,Í(FFFE 
LD DE,S<FFFF 
LD BC,?<3FFF 
LDDR 
RET 

Después de la traducción del programa resultan las siguientes 
líneas DATA para el programa cargador BASIC: 

DATA S<21,?íFE,!<FF,!<ll,!<FF,ííFF 
DATA Í<01,Í<FF,Í<3F,!<ED,Í<B8 
DATA !<C9 

(Dirección inicial es íiAOOO y dirección -final !<AOOB). 

Introduzcan ahora »MODE 2» y carguen el programa máquina con »RUN» 
arrancándolo con »CALL dirección*. 

Nuestro programa tiene un pequeño -fallo estético: 
en el recuadro superior izquierdo permanece un punto. 

Para hacerlo desaparecer cargamos la posición de memoria 
correspondiente í<COOO con 0. 

LD A,00 
LD(Í(COOO) ,A 

Code: !<3E,!<00,í<32,8t00,í<C0 
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Estos comandos los introducimos después del comando LDDR. La 
última linea DATft es la siguiente: 

DATA !<3E, ?<00, ?<32, «<00, íiCO, ?<C9 

(La dirección final se modifica a &A010) 

Después de comprobar el programa introduzca lo siguiente; 

FOR 1 = 1 TO 80: CALL SíAOOO; NEXT 

El resultado de esta instrucción es que la pantalla se desplaza 
una linea hacia abajo. Para ello se necesita bastante tiempo 
porque las 16 Ks de la pantalla deben desplazarse 80 veces. En 
BASIC este desplazamiento tardarla aproximadamente 1 hora. Si se 
desplaza el bloque de pantalla en 80 caracteres de una vez, el 
tiempo de ejecución seria 80 veces menor. Para ello debemos 
modificar los contenidos de registro en nuestro programa máquina: 

HL debe contener í(FFFF-80 en lugar de S<FFFF-1, siendo S<FFAF. 

DE queda en ?<FFFF. 

La cantidad de bytes a desplazar es S(4000-80 =Íí3FBO. 

Modifiquemos ahora las lineas DATA debidamente, y nuestro programa 
desplaza la pantalla en una linea hacia abajo. Lamentablemente los 
primeros 80 bytes de la memoria de pantalla quedan en su estado 
primitivo por lo cual debemos borrarlos. También utilizaremos para 
ello el comando de transferencia de bloques. Para poder borrar un 
área mediante el mismo hemos de utilizarlo malintencionadamente: 

En primer lugar almacenamos el Null-byte en posición íiCOOO 
(LD(StCOOO),0). A continuación desplazamos el bloque de &C000 hasta 
í(C000+80=!<C050 hacia líCOOl. Dado que las áreas en la dirección 
final del bloque fuente se superponen, deberíamos utilizar en 
realidad LDDR. 

Utilizando en cambio LDIR, HL=!<C000, DE=?<C001, BC=ít4F, se 

sobrescribe en todos los casos la posición de memoria que se 
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trasmite a continuación, con el valor recién insertado. Dado que 
ííCOOO tiene el valor 0, todos los bytes del bloque tendrán el 
valor 0. 

El programa completo tiene el aspecto siguiente: 


Di receión/código 

N. Linea BASIC 

Comando ensamblador 

AOOO 

21AFFF 

10 

LD HL,S<FFAF 

A003 

IIFFFF 

20 

LD DE,!<FFFF 

A006 

01B03F 

30 

LD BC,8(EFB0 

A009 

EDB8 

40 

LDDR 

AOOB 

3200C0 

50 

LD (ííCOOO),® 

AOOE 

2100C0 

60 

LD HL,?(C00Ó 

AOll 

IIOICO 

70 

LD DE,S<C001 

A014 

014F00 

80 

LD BC,íí4F 

A017 

EDBO 

90 

LDIR 

A019 

C9 

100 

RET 


Explicación del listado de Assembler: 

La dirección se numera consecutivamente según la cantidad de bytes 
del código. Dado que 1 byte se indica siempre con 2 números HEX 
resulta el intervalo inexplicable a simple vista de AOOO a A003. 

El código se compone de 3 bytes: S(21, $<00, S(C0. Como cada byte 
incrementa la dirección por el valor 1, la dirección inicial del 
siguiente comando será A003 (A000+3=A003). Fácilmente se puede 
obtener la longitud de comandos mediante l'a cantidad de códigos. 
Los comandos Assembler se posicionan a continuación de los 
códigos. Su -función la explicaremos más adelante. 

Si ^1 "trabajar" con el ordenador se produce un Scroll, resultarán 
irregularidades en el procedimiento del programa máquina. Este 
-fenómeno solamente se produce si no ha borrado la pantalla con el 
comando MODE 2 antes de llamar el programa. 

Prueben además lo siguiente: 
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FOR 1 = 1 TO 26: CALL !<AOOO: NEXT 

Este comando debería borrar toda la pantalla (25 líneas). Sin 
embargo las líneas que desaparecen en el borde interior de la 
pantalla aparecen nuevamente en el borde superior, en el centro de 
la línea. 

Este hecho se explica por un lado con la estructura de la memoria 
de pantalla y por otro lado por el hecho de que el scrolling 
incorporado -funciona de di-ferente -forma. Nos ocuparemos de este 
problema cuando hayamos apren/lido unos cuantos nuevos comandos. 

Haga unas cuantas pruebas con los comandos de trans-ferencia de 
bloques: 

Utilice di-ferentes valores para HL, DE y BC. 

Tengan en cuenta en todos los casos que el bloque de destino no 
exceda el área de ?<C000-!<FFFF. Esto provocaría un "colapso" en el 
ordenador, porque se sobrescribirán rutinas del sistema. 

Lo siguiente vale la pena probarlo: 

HL=?(COOO, DE=Í<FFFF, BC=?<3FFE 


4.6 COMANDOS ARITMETICOS 

Los primeros ordenadores digitales que aparecieron en los años 50 
eran considerados -fundamentalmente como máquinas calculadoras. 
Aunque aquellas primeras computadoras poco tienen que ver con los 
ordenadores actuales, los comandos aritméticos son similares. 
Existen 2 operaciones aritméticas básicas, la adición y la 
sustracción, que corresponden a los comandos en lenguaje máquina 
ADD y SUB. Como el ordenador calcula en el sistema binario, 
observemos de momento, cómo se realizan estas operaciones en el 
sistema numérico. 
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Adición: 

En el sistema decimal se suman 2 ci-fras colocadas una sobre la 
otra. La posición de la unidad se anota y las eventuales 
posiciones de las decenas (el resto) se memorizan para la adición 
de las siguientes ci-fras. 

Ejemplo: 

3573 

7154 (* Aquí debería usted memorizar un 1 

- al acarreo. Esta cifra corresponde al 

10727 desbordamiento) 

* t 

Se produce acarreo siempre que la suma de 2 cifras es mayor que 9 
(10-1). En el sistema binario se produce un acarreo cuando la suma 
de 2 cifras es mayor que 1 (2-1). 

Reglas: 

0 1 = 1 
1 + 0=1 
0 + 0=1 

1+1=0 <- (en la última suma debe acarrear 1) 


Aplicación: 

10 0 10 1 1 0 = !<96 = 150 

+ 0 0 1 1 1 0 0 1 = !(39 = 57 

1 1 0 0 1 1 1 1 = Í<CF = 207 

» t * 

(» significa: 1 de acarreo) 

En el sistema hexadecimal se obtiene el mismo resultado. 
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Se produce un acarreo cuando el resultado es mayor que 15. 

0 0 1 0 1 1 1 0 = ?<2E = 46 

+ 0 0 0 1 0 1 1 1 = S<17 = 23 

0 1 0 0 0 1 0 1 = S(45 = 69 

8(E+?<7 = 14+7 = 21 = !<15 

Es decir: anotar 5, acarrear 1. 

Con el ejemplo anterior, aún se produce otro caso en la 
binaria: 

11 

+ 11 

lio 

En la segunda posición es válida la siguiente regla: 
1+1+1=1, ylde acarreo. 

Aplicación: 

1) 10101110 = S<? = ? 

+ 00101111 = í<?= ? 


adición 


•7 


7 
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2 ) 0 0 111111 
+ 0 0 10 1111 


? 

S< ? 


3) 11111111 

+ 110 0 10 10 


= ?< ? = 

= ?< ? = 

= !< ? = 


Solución: 


1) 


1 

0 

1 

0 

1 

1 

1 

0 

2S 

!<AE 

= 

174 


+ 

0 

0 

1 

0 

1 

1 

1 

1 

= 

!<2F 

TS 

47 



1 

1 

0 

1 

1 

1 

0 

1 


!<DD 


221 

2) 


0 

0 

1 

1 

1 

1 

1 

1 


S<3F 

s 

63 


+ 

0 

0 

1 

0 

1 

1 

1 

1 

■ = 

8<2F 

s: 

157 



1 

1 

0 

1 

1 

1 

0 

0 

= 

!<DC 

= 

220 

3) 


1 

1 

1 

1 

1 

1 

1 

1 


8<FF 

= 

255 


+ 

1 

1 

0 

0 

1 

0 

1 

0 


S<CA 

= 

202 


1 

1 

1 

0 

0 

1 

0 

1 

1 

= 

Í<1C9 

r: 

457 


Referencia a 3). En esta adición se produce un acarreo de la 
posición 8 (bit 7) a la posición 9 (bit 8). Sin embargo un byte 
tiene únicamente 8 bits, por esta razón el "bit de acarreo", el 
Carry, se almacena en el bit 0 del registro flag. En principio 
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pueden sumarse también números de varias ci-fras, pero para ello 
debe procederse de otra -forma. 


Sustracción 

La substracción en el sistema binario es análoga a la del sistema 
decimal. 

Existen las reglas siguientes: 

0-1=1 memorizar 1 
1 - 0=1 
0-0 = 0 
1-1=0 

Veamos un ejemplo: 


0 

1 

1 

0 

1 

1 

1 

0 

= !<6E = 

lio 

- 0 

0 

1 

1 

0 

1 

0 

1 

= í<35 = 

53 

0 

0 

1 

1 

1 

0 

0 

1 

!<39 

57 


» t * 


Reconoceremos las reglas especiales para la continuación del 
cálculo con el acarreo: 

1 - (1-t-l) = 1 acarrear 1 

0 - (l-*-!) =0 acarrear 1 

Ejercicios; 

Realice los mismos ejercicios planteados para la adición, ahora 
con la substracción. Compruebe usted mismo los resultados 
convirtiendo al sistema decimal. 

Re-ferente a 2). Tras -finalizar el cálculo, se obtiene un resultado 
negativo. El resultado correcto seria 63-157=-84. En sistema 
binario: 
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0 0 111111 
-10 0 1110 1 


1 1 0 1 0 0 0 1 0 = !(1A2 

Evidentemente, este resultado es erróneo. En la sustracción 
binaria con el ordenador, se presenta el problema de que aparecen 
números negativos. Para ello se ha establecido la convención 
siguiente: 

El bit 7 de un número binario se utiliza como bit de signo. 0 
indica cantidades positivas, 1 indica valores negativos. Con esto 
se limita, de -128 hasta +127, el margen de números codificados 
por un byte. La sustracción de números binarios lleva de esta 
■forma a la adición algebraica (con signo 5-2=5+(-2)). La 
representación con signo que se utiliza en la sustracción se 
denomina complemento a 2. 

¿Qué es el COMPLEMENTO A DOS? 

En la representación del complemento a dos, los números positivos 
se representan al igual que hasta ahora hemos visto, p.ejemplo 
5={<B00000101, 126=SiB01111110. 

Un número negativo se representa calculando en primer lugar su 
complemento. El complemento es el número binario, en el que todos 
los bits tienen el valor inverso, 0 se convierte en 1 y viceversa. 
El número binario así obtenido de denomina “complemento a uno" o 
simplemente complemento. 

Ejemplo: 

Número : 7 = Í<x00000111 

Complemento : ScxlllllOOO 

Para calcular el complemento a dos de un número se debe sumar 1 al 
mismo. 
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Ejemplo: 


Complemento : 

más 1 + 

11111000 

1 

Complemento a 2 : 

8(xl 1111001 


Esta es la representadún de -7 en complemento a 2 . 

Así pues, el complemento a dos se -forma de la siguiente manera: 

- un número positivo permanece invariable 

- en los números negativos se calcula el complemento y se le 
suma 1 


Representación del complemento a 2. 
Decimal Complemento a dos 


•fl27 

■H26 

+125 


$<X01111111 

!<X01111110 

SíXOlllllOl 


+ 2 
+ 1 
0 

- 1 
- 2 
- 3 


?<X00000010 

S<X00000001 

«<xoooooooo 

Í<X11111111 

i<X11111110 

&X11111101 


-126 

-127 

-128 


Í(X 10000010 
8<X 10000000 
!<X 10000000 
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Para conservar el valor de un número negativo representado en 
complemento a dos, se construye nuevamente a partir del número el 
complemento a dos. 

Ejemplo: 

Í¡x00000111 Complemento 


Í<X00001000 

«.XOOOOIOOO = 8 

i Esto significa que el valor de StXl 1111000 es -8! 

Una doble aplicación de complemento a dos nos lleva nuevamente al 
número de partida. 

El Z80 dispone de comandos para la conversión del contenido del 
acumulador en el complemento <CPL) y en el complemento a dos 
(NEG). A continuación veremos la función de estos comandos en sus 
análogos de BASIC: 

Observemos en primer lugar la formación del complemento: 

'A’ contiene un número entre 0 y 255 (1 Byte). El comando BIN$ 
convierte un número en un string, que corresponde al valor en 
binario del número. Complementaremos esta cadena de caracteres 
trabajando bit a bit. 

10 A=í<X110n 
20 abin$=BIN$(a,8) 

30 PRINT "Nro. Binario :'';abin* 

40 POR i=0 TO 7 

50 bit*=MID»(abin,8-i,1): REM Bit Nro. 1 
60 IF bit$="r' THEN bit$=“0" ELSE bit*="l" 

70 akpl$=bit*+akpl$ : REM akplá es complemento * de a 
80 NEXT 

90 PRINT "Complemento: akpl$ 

100 A=VAU ("S<X"+akpl$> 
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La línea 50 extrae, si corresponde, el Bit-i de abin*. En la línea 
60 se construye el complemento del bit; es decir, si contiene un 0 
se inserta un 1 y viceversa. En la línea 70 se reúnen los bits 
complementados en akpl$. El presente programa es lógicamente 
bastante lento. El comando XOR puede calcular el complemento en 
BASIC de -forma más rápida. En este punto sólo nos interesa 
presentar el programa; la modalidad de -funcionamiento de este 
comando lógico la expondremos en el siguiente capítulo. 

10 A=?<xiion 

20 abin$=BIN$(a,8) 

30 F'RINT "Nro. Binario:"; abin$ 

40 a=a XOR 255 
50 akpl$=BINÍ(a,8) 

90 PRINT "Complemento! ";akpl* 

La línea 40 realiza la verdadera -formación del complemento. 

El comando NEG convierte un número positivo en uno negativo 
codi-ficado en complemento a dos. En BASIC obtenemos idéntico 
resultado agregando la linea 45: 

10 AiJíXllOll 
20 abin$=BIN$(a,8) 

30 PRINT "Nro. Binario:"; abin$ 

40 a=a XOR 255 
45 a=a-t-l 

50 akpl$=BIN$(a,8) 

60 PRINT "Complemento! ";akpl$ 

Inserte también la linea siguiente: 

100 GOTO 40 

Tras la interrupción de este programa sin -fin, comprobará que la 
realización de una doble -formación del complemento a dos lleva 
nuevamente al punto de partida. 
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Con la representación del complemento a dos, se considera una 
sustracción de dos números como adición de uno de ellos con el 
complemento a dos del otro. Por otro lado, cuando se coloca el Bit 
7, el resultado de una substracción se considera como número 
negativo (representado en complemento a dos). 

Ejemplo: 

120 - 63 = 57 
120 = «(XOllllOOO 
63 = SiXOOllllll 

El complemento a dos de 63 es ?<X11000001 
Ahora e-fectuamos la adición: 

01111000 = 120 

+ 11000001 = Complemento a dos de 63 


100111001 

No tengamos en cuenta de momento el desbordamiento del bit 7 al 
bit 8 (Carry). Nuestro resultado es correcto: !<X00111001 = 57. 

El bit 7 no se ha activado, lo que quiere decir que el resultado 
es positivo, según lo cual no debería activarse tampoco el Carry. 

Dado que estamos calculando con el complemento a dos, el resultado 
del acarreo queda también complementado. En este caso no es 
necesario tenerlo en cuenta. Nuestro resultado es correcto de 
todos modos. 

La observación exacta de la aritmética trabajando con números con 
signo, demuestra que deben tenerse en cuenta algunas casos 
especiales, donde es muy importante el efecto conjunto de los 
flags. 
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Ejercicio: 

Calcule el complemento a dos de: 

1) -íiO 

2 ) -120 

3) +5 

4) -6 


Soluciones: 


1) 

Í(X11000100 

(=196) 

2) 

Í<X 10001000 

(=136) 

3) 

S<X00000101 

(=5) 

4) 

tíXlllllOlO 

(=250) 


COMANDOS ARITMETICOS Y DE CALCULO DE 8-BITS 


Existen 2 comandos de este tipo para la adición y la substracción: 
ADD;ADC y SUBjSBC 

Para los comandos que utilizan la letra C (-Carry), debe tenerse 
en cuenta en la operación el tlag de acarreo en su -forma 
correspondiente. Al utilizar uno de estos dos comandos, se sumará 
o restará el bit 0 del registro F (iiel carry!!). 

Los operandos de estos comandos tienen el -formato siguiente: 

A,x donde x corresponde a reg, datos, (HL), (IX-t-d) o (lY-fd) 

De esta -forma se obtienen los siguientes tipos de instrucciones. 
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A,reg 
A,datos 
A,(HL) 

A,(XY+des) 


implícito 
inmediato 
indirecto 
Índexado 


Con el comando SUB, sólo se indican como operandos: reg, datos 
(HL), (IX+d) o (lY+d). "A" se excluye debido a que todos los 
comandos de este tipo se re-fieren al Acumulador. 

Estos comandos son operaciones de 8 bits. El Z80 contiene además 
operaciones de 16 bits. 


INFLUENCIA DE FLA6S 

Al ejecutar comandos que manipulan datos, se in-fluyen los 
siguientes -flags: 

Flag de acarreo (Carry) 

El carry se activa cuando tiene lugar un acarreo del bit 7 al bit 
8. Puesto que un byte se compone sólo de los bits 0 a 7, el 
acarreo se almacena en el flag C. En caso contrario, el flag de 
acarreo se desactiva. 

Flags N y H 

Estos flags se influencian en la aritmética BCD, pero carecen de 
importancia para el programador. 

Flags P/V - Dverflow 

Un desbordamiento se define de la siguiente forma: 

- Cuando hay un acarreo interno del bit 6 al bit 7, y no hay 
acarreo del bit 7 al bit 8 (el acarreo que se indica 
mediante el Carry, se denomina acarreo externo). 


- Cuando no hay ningún acarreo interno, pero si uno externo. 
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No precisaremos aquí cómo han sido -formuladas estas definiciones. 
Lo importante es saber que este flag es activado, cuando en una 
operación aritmética, el signo del resultado (Bit 7) se modifica 
con error. El flag V se activa cuando tiene lugar un 
desbordamiento, de lo contrario se desactiva. 

Zero-Flag 

Este flag se activa si el resultado de la operación es 0, de lo 
contrario se desactiva. 

Flag de signo 

Este flag corresponde al bit 7 del resultado. En la representación 
numérica con signo, éste corresponde al signo, de aquí le viene su 
nombre de flag de signo. 

Encontrará una tabla de la influencia de los flags en el Anexo del 
presente libro. 

En lo sucesivo, para la explicación de los comandos escribiremos 
lo siguiente para el estado de un flag después de una operación: 

1 - El flag se activa después de la operación. 

0 - El flag se desactiva después de la operación 
X - El flag es desconocido después de la operación 
(t - El flag se activa o desactiva como resultado de la operación 
P - El flag P/V indica la paridad 

- Carácter en blanco: no hay influencia 

Ejemplo: Flags S Z P/V C 

X I 1 
significado: 

S - desconocido 

Z - si 0 entonces 1 y viceversa 

P/V - 1 

C - ninguna influencia 
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Analogías BASIC para los comandos; 


ADD A,H BASIC: A=A+H 

ADC A,&A9 BASIC: A=A+?<A9+CF 


CF es el Carry—flag, su valor se suma adicionalmente. 


SUB A,(HL) 
SBC A,L 


BASIC: A=A-PEEK(HL) 
BASIC; A=A-L-CF 


Ejemplos: 

ADD A, (HL) A = ?<1F 

HL = !<B1C9 

Posición de memoria S<B1C9: ¡<43 

MF = 0 0 0 1 1 1 l 1 
+ í<43 = 0 1 0 0 0 0 1 1 


0 1 1 0 0 0 1 0 

876543210 - Números de bit 


Bit-8 = 0 => Carry -flag = 0 
Bit-7 = 0 => Sign—flag » 0 
Resultado <>0 => Zero-flag = 0 

Desbordamiento externo = 0 e interno = 0 => overflow (P/V)-flag 

Contenido del acumulador después de la operación; &X011000110 
S<62 


ADD A,D 


A contiene &£! 
D contiene S(A2 
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Í<E1 = 1 1 1 0 0 0 0 1 

+ Í(A2 = 1 0 1 0 0 0 1 0 


M83 = 1 1 0 0 0 0 0 1 1 

876543210 - Nro. bit 


Bit 8 = 1 => Carry—flag = 1 
Bit 7 = 1 => Sign—flag = 1 
Resultado no nulo => Zero-tlag = 0 

Desbordamiento externo e interno => overflow (P/V) flag = 0 

Contenido del ACU tras la ejecución: S<X 10000011=S<83 

Como pueden observar, el acumulador no contiene el resultado 
correcto; sólo obtenemos el resultado correcto agregando el flag 
de acarreo como octavo bit. Por este motivo es importante 
comprobar el estado de los flags tras las operaciones aritméticas 
y corregir asi los eventuales resultados incorrectos. 

Observe además que en una operación cuyo resultado es exactamente 
256, se activa el flag de cero, aunque el resultado no sea nulo. 

ADC A, 8(19 A=8¡5A 

Carry-flag * 1 (activado) 

8¡5A = 0 1 0 1 10 10 
+ 8(19 = 0 0 0 1 1 0 0 1 


8(74 = 0 1 1 1 0 1 0 0 

Flags: S Z V C ACU = 8(X01110100 » 8(74 

0 0 0 0 

Recuerde: si se desactiva el carry-flag antes de un comando ADC, 
éste corresponderá exactamente al comando ADD. 
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SUB A,(HL) 


A contiene !(3C 
HL contiene ííBCÍ9 
&BC19 contiene SdS 

0 0 110 110 Íí36 

11101011 complemento a dos de S(15 


1 0 0 1 0 0 0 0 1 

Bit 7=0 => el Sign-flag * 0 
Bit-8=1 => Carry—flag=0 

Observen que en nuestro ejemplo el complemento se ha tomado 
verdadero Carry (icaso especial!). 


No hay desbordamiento V=0 
Resultado O 0 => Z=0 

Contenido del ACU después de la ejecución S(X00100001=&21 

SBC A,B 
A=«<57 
B=«(73 

CF»1 


0 10 10 111 
+ 1 0 0 0 1 1 0 1 
+ 11111111 


í<57 


Complemento 

Complemento 


a dos de tt73 
a dos de Sel (CF> 


1 1 1 1 0 0 0 1 1 


del 


Flagsi S Z V C 
10 0 1 
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Contenido del ACU: Í<X11100100 = !<E4 
complemento a dos de 29 

es decir, el resultado es -29 (87-115-l=-29) 


Además de la aritmética binaria, existe otra modalidad de efectuar 
operaciones en el ordenador. 


Aritmética BCD 

En esta modalidad, cada cifra del sistema decimal se representa 
por un bloque de 4 bits. Esta aplicación es importante para el 
tratamiento de problemas comerciales, que exigen normalmente 
mantener una perfecta exactitud de los dígitos decimales. Para las 
operaciones BCD existe el comando especial DAA, que prepara el 
contenido del acumulador para tales operaciones. 

Existen también los comandos especiales CPL y NEG, ya descritos. 
CPL complementa el contenido del ACU y NEG lo convierte en 
complemento a dos. 

Esta aritmética convierte asimismo algunos comandos "normales" en 
especiales; p. ej. para borrar el ACU, puede utilizarse SUB A. 
Este comando efectúa la operación en la mitad de tiempo que el 
comando LD A,0. 

A este tipo de comandos corresponden asimismo los comandos de 
contador, que incrementan o decrementan el valor de una posición 
de memoria. Para los comandos de contado se dispone de los 
direccionamientos implícito, indexado y de registro. Los comandos 
de este tipo se utilizan frecuentemente para la programación de 
bucles. Su modalidad de funcionamiento es sencilla: 


INC X 
DEC X 


incrementa x y 

decrementa x, donde x puede ser: 
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reg, (HL), (XY+des) 

INC reg BftSIC: reg=reg+l 

DEC (HL) BASIC: POKE HL,PEEK (HL)-l 


Cada uno de los -flags de signo, de cero y V se activan o 
desactivan, segiln el resultado de la operación. El carry permanece 
inalterado. Es importante remarcar el hecho de que sólo los 
comandos de contador de 8 bits in-fluyen sobre los -flags; por el 
contrario en los comandos de contador de 16 bits, debe efectuarse 
una comparación adicional. 
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Sume formui jihI 
>Ulc»á'(IN( 
KepUc liMi wiih 
101 iit OI* coitc. 


Nolet: The V symbol in thc P/V fluf column mdlculc^ ihj( ihv P'V flag con(ain% Ihc overflow ol ilic rvMiU «í tlw 

Operación Simüarly ihc P «ymbol indícale* paniy. V • I mean* overflow. V ■ 0 mean* noi overflow P « I 
means parity of che recule ts even. P ■ 0 mean* panly ol itie rcstill i* oüd. 

Klif Noiation: • > flas not affeeted. 0 > flag rr*ei, I > fla{! <*‘ 1 . X * tlap t» unknown. 

|•fla|» afl'cctcd accordini to Ihe rvsuh of Ihe operaiion 
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COMANDOS ARITMETICOS DE 16 BITS 


En principio, los comandos aritméticos de 16 bits se asemejan a 
los de 8 bits, aunque tienen mayores limitaciones. Para algunos 
pares de registras, sólo se presentan los comandos ADD, ADC y SUB. 
El resultado de una operación se coloca básicamente en el registro 
HU (no en el acumulador, como en los comandos de 8 bits). Con el 
comando ADD existe la posibilidad de almacenar resultados en los 
registras índices. 

Los comandos de 16 bits representan ejecuciones sucesivas de 
comandos de 8 bits. Como la asociación de estos comandos se 
produce de -forma automática, los comandos de 16 bits son más 
rápidos y más cortos. 


16-BITS 

8-BITS 

ADD HL,BC 

LD A,L 
ADD A,C 


LD L,A 
LD A,H 


ADC A,B 


LD H,A 


Algunos comandos aritméticos de 16 bits utilizan el 
direccionamiento implícito. La influencia de flags en ADC y SBC es 
análoga a la de los comandos de 8 bits. Con ADD sólo se 
influencia en flag carry, iy en los comandos INC y DEC, de 16- 
bits, no se tienen en cuenta los flags!. 


ADD IX,DE 
ADC HL,BC 
SBC HL,SP 


BASIC: IX=IX-:-DE 
BASIC: HL=HL+BC+CF 
BASIC: HL*HL-SP-CF 
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Ejemplo: 

HL=8!C000 

DE=S(0800 

ADD HL,DE 

SíCOOO = 1100 0000 0000 0000 
+ «¡0800 = 0000 1000 0000 0000 


?<C800 = 1100 1000 0000 0000 

Flags: S Z V C 
0 

Los -flags S, Z y V no quedan afectados. 

HL=?<F800 

DE=«(0800 

ADC HL,DE 

SíFSOO = lili 1000 0000 0000 

+ !<0800 = 0000 1000 0000 0000 


S< 10000 = 1 0000 0000 0000 0000 

Flags: S Z V C 
0 0 11 

En este caso el contenido de HL no representa el resultado 
correcto 8<10000, sino que tiene 0. El flag carry señala el error. 
En las operaciones con 16 bits, es el bit 16 el que pone de 
manifiesto este error. 

Todos los comandos de cálculo de 16 bits son de direccionamiento 
implícito. .Pueden referirse a los registros de 16 bits: BC, DE, 
HL, SP, IX e lY. Contrariamente a los comandos de cálculo de 8 
bits, estos comandos no influyen sobre los flags (!). 
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Symbolic 

C^rition 

FUI, 

Op-Code 

No. 

oí 

No. 
of M 

No. 

ofT 


Mnemonic 

a 

B 


B 

D 

a 

76 543 210 

Bytes 

Cyclaa 

States 

Commenta 

ADDHL, n 

HL-HUai 

t 

• 

• 

• 

0 

X 

00 aal 001 

1 

3 

11 

aa Reg. 

00 BC 

ADCHL, la 

HL«-HL+tt+CY 

t 

1 

V 

* 

0 

X 

n 101 101 

01 ul 010 

2 

4 

15 

01 DE 

10 HL 

11 SP 

SBCHL.m 

HL-HL-ttCY 

t 

t 

V 

t 


X 

11 101 101 

01 saO 010 

2 

4 

15 


ADD IX. pp 

IX - IX ♦ pp 

t 

• 

• 

• 

0 

X 

n 011 101 

2 

4 

15 

PP Reg. 









00 ppl 001 




00 BC 

01 DE 

10 IX 

11 SP 

ADD lY.ii 

lY-IY+rr 

t 

• 

• 

• 

0 

X 

11 111 iOI 

2 

4 

15 

n Reg. 









00 rrl 001 




00 BC 

01 DE 

10 lY 

11 SP 

INC sa 

u u * 1 

• 

• 

• 

• 

• 

• 

00 ssO 011 

1 

I 

6 


INC IX 

IX «- IX « 1 

• 

• 

• 

• 

• 

• 

II 011 101 

00 100 011 

2 

2 

10 


INC lY 

lY -lY ♦ t 

• 

• 

• 

• 

• 

• 

11 111 101 

2 

2 

10 










00 100 011 





DEC u 

» - ts - t 

• 

• 

• 

• 

• 

• 

00 isl 011 

1 

' 

6 


DEC IX 

IX-IX - 1 

• 

• 

• 

• 

• 

• 

II 011 101 

00 IOI 011 

2 

2 

10 


DEC lY 

lY-IY - 1 

• 

• 

• 

• 

• 

• 

11 III 101 

00 101 Olí 

2 

2 

10 



Notes: i> is sny of 'he regisier peifs BC, DE, HL, SP 

pp is any of the register psirs BC. DE. IX. SP 
rr is any of the regiiler pain BC, DE, lY. SP. 

Flag Nolalion: • ■ tlag not afíccied. 0 • flag rcset, I ■ flag id. X ■ fljg ts unknown. 
} > t1ag ii affcdcü according to the rciuli of tlic opcraiion. 
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Aplicación: 


Una vez dejado atrás el tramo más árido, vamos por fin a aplicar 
por vez primera los nuevos comandos. Escriba un pequeño programa 
para la suma de 2 cifras de 8 bits. Las cifras se almacenarán en 
la memoria RAM mediante comandos POKE de BASIC. El resultado de la 
suma debe almacenarse nuevamente en el RAM. Después de volver al 
BASIC, podremos leer el resultado utilizando PEEK. 


Solución: 

Dado que las sumas de 8 bits utilizan básicamente el ACU, el 
primer sumando deberemos almacenarlo en el ACU. 

LD A,sumando 

El segundo sumando lo almacenaremos en un registro de 8 bits. 

LD H,sumando 

Ahora efectuaremos la suma: 

ADD A,H 

El resultado debemos almacenarlo en tiAlOO: 

LD (Í<A100),A 

Si seleccionamos como dirección inicial SiAOOO, obtenemos el cuadro 
siguiente: 


AOOO 

3E10 

10 

LD 

A,!<10 

A002 

2620 

20 

LD 

H,S(20 

A004 

87 

30 

ADD 

A,H 

A005 

3200A1 

40 

LDD 

(&A100),A 

A008 

C9 

50 

RET 
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La linea DATA del programa cargador será: 

60 DATA S<38,Í¡10,?<26,?<20,?<84,!<32,Í<00,!<A1,?<C9 

Del listado ensamblador se deduce que el primer sumando es 
almacenado en la dirección ÍíAOOI, y el segundo en la dirección 
S!A003. En nuestro ejemplo hemos elegido !<10 y ?í 20. El programa 
BASIC, que establece estos valores, ejecuta el programa máquina y 
extrae los resultados, tiene el siguiente aspecto: 

10 POKE ?<A001,ler. Sumando 
20 POKE í(A003,2do. Sumando 
30 CALL íiAOOO 
40 PRINT PEEK <5<A000) 


4.7 COMANDOS LOGICOS Y CP (COMPARE) 


En los comandos para el tratamiento de datos se incluyen también 
los comandos lógicos. 

El ZSO posee los comandos lógicos AND, OR y XOR (OR exclusivo), y 
el comando de comparación CP. Todos estos comandos trabajan con 
datos de 8 bits. El ACU es siempre el registro con el que se 
-ealiza la operación lógica. Por esta razón, el ACU no es 
necesario indicarlo (como por ej. en ADD A,B) en el operando del 
comando ensamblador (como p.ej. AND B). 

Los cuatro comandos AND, OR, XOR y CP pueden codificarse con los 
tipos siguientes de direccionamiento: 

-Implícito (registro A, B, C, D, E, H, L) 

-Indirecto : registro (HL) 

-Indexado 
-Inmediato 
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Observemos las -funciones de los comandos lógicos. Cualquier 
persona es capaz de comprender la siguiente sentencia lógicas 

"Cuando llueva (entonces) la calle se mojará" 

Esta expresión es una deducción de la -forma 
(cuando entonces 

Observemos ahora la sentencia siguientes 

"Cuando llueve, y yo estoy en la calle, (entonces) me mojo". 

En este caso hay 2 expresiones unidas por la conjunción Y. El Y 
lógico (ingl.sAND) expresa que ambas expresiones, es decir 
"llueve" (Ira. expresión) y "yo estoy en la calle" (2da. 
expresión), han de tener lugar para que se produzca el resultado. 
Si no llueve (no se cumple la Ira. expresión), yo no me mojo. Si 
no estoy en la calle (no se cumple la 2da. expresión), tampoco me 
mojo. Para que la consecuencia se produzca (sea verdadera), han de 
cumplirse ambas expresiones. Esta es la particularidad de la 
conexión AND (Y). Ya que el ordenador trabaja con 0 y 1, se adopta 
la convención siguiente: 

1 - corresponde a "expresión verdadera" 

0 - corresponde a "expresión falsa" 

Con ello se obtiene: 

1 AND 1=1 ambas expres. son verdaderas => resultado verdadero 

1 AND 0=0 una expresión es falsa => resultado falso 

0 AND 1=0 una expresión es falsa => resultado falso 

0 AND 0=0 ambas expresiones son falsas => resultado falso 

El BASIC del CPC contiene los comandos lógicos. Pruébelos usted 
mismo: 


PRINT 1 AND 1 
PRINT 1 AND 0 


etc... 
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Las operaciones lógicas son de máxima importancia para la técnica 
de ordenadores y son -fáciles de realizar electrónicamente. Para 
ello hay 2 direcciones de entrada que llevan corriente (=1), o que 
no la llevan (=0), conectadas a un circuito eléctrico, cuya 
dirección de salida conduce o no corriente (es 1 ó 0)según sean 
las necesidades de la entrada. Tales circuitos se comprenden con 
ayuda del Algebra de Boole. Un microprocesador está compuesto por 
múltiples puertas lógicas cerradas, situadas una después de la 
otra. La suma en el MPU se forma p.ej., a partir de diversas 
operaciones lógicas. 

Nosotros como programadores que somos, no entramos en contacto con 
estas estructuras. Aplicamos las operaciones lógicas a datos (8 
bits). Para ello se unen en operaciones lógicas cada uno de los 
correspondientes bits de ambos bytes. 

11111000 
AND 01010011 


01010000 

Bit 0: 0 AND 1 = 0 
Bit 1; 0 AND 1 = 0 
Bit 3: 0 AND 0 = 0 
Bit 4: 1 AND 0 = 0 
Bit 5: 1 AND 1 = 1 


Una de las aplicaciones más útiles del comando AND consiste en la 
utilización de este comando para borrar o anular determinados 
bits. 


A=J<X10111001 

Supongamos que queremos únicamente observar los bits 0 a 3, es 
decir, han de anularse desde el bit 4 hasta el bit 7. Para 
conseguirlo unimos (con Y) A con StXOOOOllll. 
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10111001 :A 

AND 00001111 ;Máscara 


00001001 

La máscara utilizada para anular los bits, contiene un '0’ para un 
bit que debe anularse, y un ’l’ para conservar el valor de un bit 
significativo. 

Formulemos en BASIC: 

A = SíXlOlllOOl 
A = A AND SiXOOOOllll 

En lenguaje máquina obtenemos: 

LD A,?<X10111001 
AND SíXOOOOllll 


Observe las siguientes expresiones: 

"Cuando llueve, 0 me baño, (entonces) me mojo" 

El resultado será cierto cuando, como mínimo, una de las dos 
expresiones sea verdadera. Con ello, obtenemos el cuadro siguiente 
para la conjunción ’O’ (OR). 

0 OR 0=0 
0 OR 1=1 
1 OR 0=1 
1 OR 1=1 

Con la conjunción OR es posible activar determinados bits de un 
byte. 

A contiene SiXlOOOlOll 

Ahora han de colocarse los 3 primeros bits (5, 6, 7) en ’l’: 
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10001011 !A 

OR 11100000 ;Máscara 


11101011 

Para cada bit que ha de colocarse a 1, la máscara comtiene un 1 y 
para los bits que no han de modi-ficarse, un 0. 

LD A,Í<X10001011 BASIC: A=!<X10001011 

OR ?<X11100000 BASIC: A=A OR ?<X11100000 

El comando XOR o "OR exclusivo", sólo se diferencia en un punto 
del OR normal. Si ambos bits contienen un 1, la salida será 0. El 
comando OR exclusivo suministra un 1 para entradas diferentes y un 
0 para entradas iguales: 

0 XOR 0=0 
0 XOR 1=1 
1 XOR 0=1 
1 XOR 1=0 

Existen 2 aplicaciones típicas para la relación XOR, la 
comparación y la complementación. Los bytes que han de compararse 
se unen mediante XOR. Si el resultado es 0, esto significa que 
todos los bytes comparados han resultado iguales; si se produce en 
cambio desigualdad, quedan activados los bits desiguales en el 
resultado. 

10101010 

XOR 10101010 ¡Comparación! 


00000000 

10101010 

XOR 10101100 ¡Comparación! 


00000110 
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=> Bit 1 y Bit 2 son diferentes. 

Para la complementad6n se unen nuevamente los bits con una 
máscara. Esta contiene un 1 para un bit que ha de complementarse 
y un 0 para un bit que permanece invariable. 

Bit 4-7 deben complementarse. 

10101111 .-A 

XOR 11110000 :Máscara 


01011111 


Analogías: 

Lenguaje máquina BASIC 

AND H A=A AND H 

OR (HL) A=A OR PEEK (HL) 

XOR ScFF A=A XOR !(FF 

En los comandos lógicos, el carry siempre se coloca en 0. Los 
flags Z y S, como es habitual, se influyen. El flag P/V indica en 
estos comandos la'paridad del resultado. La paridad será 1 cuando 
la cantidad de ’l' en el byte sea par, y será cero cuando el 
número de ’l’ del byte sea impar. 

Aplicación: 

1. ¿Qué produce un: 

- OR con Í<FF ? 

- OR con &0 ? 

- AND con J<FF ? 

- AND con S¡0 ? 

- XOR con S(FF ? 

- XOR con !<0 ? 
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2. En Basic existe el comando NOT. Convierta este comando a 
lenguaje máquina siguiendo dos modalidades diferentes 
(respecto al ACU). 


Soluciones: 

Para 1. 

OR SíFF => !<FF, es decir, todos los bits están activados 

OR i:0 => no hay ninguna modificación 

AND StFF => ninguna modificación 

AND !<0 => SíO es decir, todos los bits has sido desactivados 

XOR SiFF => todos los bits se han complementado 
"XOR 5¡0 => ninguna alteración 


Comando XOR: XOR !<FF 

Comando CPL: CPL 


EL COMANDO DE COMPARACION CP (INFLUENCIA DE FLAGS) 

El comando CP se utiliza para comparar el contenido del ACU con un 
byte, que puede estar direcclonado de las formas siguientes: 

- direccionamiento implícito: registros A, B, C, D, E, H, L 

- direccionamiento indirecto: par de registros (HL) 

- direccionamiento indexado 

- direccionamiento inmediato 

Mediante el comando CP se sustrae al acumulador el byte 
direcclonado y se influyen cada uno de los flags según el 
resultado de la operación. Contrariamente al comando SUB, el 
resultado no se almacena en el acumulador, es decir, el contenido 
del ACU no queda afectado por el comando. Dependiendo del estado 
de los flags, puede efectuarse un salto condicional después de 




114 


El libro del Lenguaje Máquina del CPC 


este comando. 

Observemos los posibles casos que se presentan en la comparación; 

El contenido del acumulador es mayor: 

- En este caso, el carry siempre es 0, pues el resultado puede ser 
mayor que 255. 

El contenido del acumulador es igual: 

- En este caso, 2=1, debido a que el resultado de la sustracción 
es 0. También aquí C=0 debido a que no se realiza ningún 
acarreo. 

El contenido del acumulador es menor: 

- En este caso, el flag de acarreo siempre estará activado, pues 
se realiza un acarreo negativo. 


REGLAS: 


c=o 

significa 

>= 

2=0 

significa 

= 

C=1 

significa 

< 

Se obtiene 

además: 


2=1 

significa 

O 

C=0 y 2=1 

significa 

> 

C=1 o bien 

2=0 significa 

=< 


Estas reglas serán válidas sólo cuando los bytes que han de 
compararse se consideran como números sin signo, situados entre 0 
y 255. 

Si ambos bytes presentan números con signo en complemento a dos, 
adquieren validez unas reglas más complejas que resultan de las 
reglas a las que están sujetos los flags para la aritmética con 
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signos. En la mayoría de los casos no es necesaria esta 
aplicación. 

Para la decisión de la comparación de igualdad se utiliza el tlag 
Z. Según el estado de los tlags S y V se decidirá si es mayor o 
menor. Los -flags S y V se enlazan lógicamente mediante el comando 
XOR; es decir, si se activa V (tiene lugar un desbordamiento), se 
complementa S, de lo contrario S permanece en su estado anterior. 


S XOR V = b significa >= 

S XOR V = 1 significa < 

En lo sucesivo, partiremos de la premisa de que los bytes se 
interpretarán como números carentes de signo. 

Ejemplo: 

A = «<35 
B = í(2i 

CP B 


suministra a 

S Z V 

C 



0 0 0 

0 

debido a: 

00110101 :A 

00100001 :B 

00010100 

(ningún 

(!) 

complemento 


No hay acarreo 
Bit“0 
O 0 

No hay desbordamiento 


=> C=0 
=> S=0 

=> Z=0 

*> V=0 


El Carry-flag es igual a cero, lo que significa que el contenido 
del acumulador es mayor que el del byte comparado (contenido del 
registro B>. 
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C = !<81 


Flags: 


CP C proporciona 


S Z V C 
10 11 

00000001 

10000001 


debido a: 

: Registro 
: Registro 


A 

C 


110000000 


Acarreo 

de bit 

7 a bit 8 


Bit 7 = 

1 


= > 

O 

acarreo 

de bit 

7 a bit 8 

= > 

ningún 

acarreo 

de bit 6 a bit 

7 => 


C=1 

S=1 

Z=0 


V=1 


En consecuencia C=l, de donde se deduce que el valor con el que se 
ha efectuado la comparación (contenido en el registro C), es mayor 
que el contenido del acumulador. 


Encontrará una lista de comandos lógicos junto a los comandos 
aritméticos de 8 bits (Capitulo 4.6). 


PROGRAMA DEMO 


AOOO 

06FF 

10 

LD 

B,?<FF 

A002 

2100C0 

20 

LD 

HL,!<C000 

A005 

7E 

30 

LD 

A,(HL) 

A006 

A8 

40 

XOR 

B 

A007 

77 

50 

LD 

(HL),A 

A008 

23 

60 

INC 

HL 

A009 

3E00 

70 

LD 

A,0 

AOOB 

BC 

80 

CP 

H 

AOOC 

20F7 

90 

JR 

NZ,!(A005 

AOOE 

C9 

100 

RET 
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Este programa invierte la pantalla completa en MODE 2. 

LD Ei,S(FF es la máscara con la cual se invierte el contenido del 
ACU, mediante el comando XOR B. 

HL se carga con la dirección inicial de la pantalla, ítCOOO (LD 
HL,?<COOO). Comienza entonces el bucle de programa. LD A, (HL) lee 
un byte de la memoria de pantalla. Este valor se invierte a través 
de XOR B, grabándose a continuación nuevamente en la memoria de 
pantalla mediante LD (HL),A. Se incrementa entonces HL (INC HL) y 
se comprueba si HL se encuentra aún en el área de la memoria de 
pantalla. 

El contenido de HL está comprendido entre ?<C000 y ?<FFFF. Si HL se 
incrementa nuevamente (?(FFFF + 1), obtenemos el valor 0 para HL. 
En realidad el resultado sería í<10000, pero dado que HL sólo puede 
almacenar números de 16 bits, se ignora el bit sobrante: HL=0. 

Con el comando CP debe comprobarse si L ya contiene 0. Dado que CP 
siempre compara el contenido del ACU, el mismo debe cargarse 
previamente con 0 mediante LD A,0. 

La comparación debe realizarse ahora con el High-byte de HL, si 
H=0 resulta entonces HL=0. A través del comando CP el -flag Z se ve 
in-fluído de la -forma correspondiente. 

El siguiente comando de bifurcación JR NZ.&AOOS significa: 

"Bifurca a dirección !<A005, si Z diferente de 0 (non zero), de lo 
contrario ejecuta el comando siguiente". 

Si HL=0 el programa finaliza con RET. 

Las líneas DATA del cargador BASIC son las siguientes: 

DATA !<06, !<FF, í<21, ?<00, !<C0, S¡7E, Í(AB, í<77 
DATA «<23, !<3E, S<00, Í<BC, ?<20, ?íF7, !<C9 

Seleccione SíAOOO como dirección inicial, !<A000+15-1=?<A00E como 
dirección final y arranque con ICALL ÍíAOOO* (en MODE 2). 
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Podemos también utilizar el comando CPL (Complementar ACU) en 
lugar de XOR B. 

Conmute ahora a MODE 1 y pruebe la rutina. El resultado deseado no 
se obtiene. La razón la encuentran en la ,arquitectura de la 
memoria de pantalla. Como ya saben en MODE 2 bits y puntos 
activados se corresponden directamente. Por ello no pueden 
elegirse di-ferentes colores de letra en modalidad 2. En MODE 1 
tenemos 4 colores disponibles. Dado que disponemos únicamente del 
área J<C000-í<FFFF y adicionalmente debe almacenarse la información 
correspondiente al color, en MODE 1 los cuatro bits superiores de 
cada byte se responsabilizan de la activación de un punto de doble 
espesor. Los bits inferiores determinan el color. Dado que 
invertimos los puntos y no los colores, debemos modificar la 
máscara de inversión. LD BjÍíFF (í<FF=!<X 1 1111111) significa que se 
invierten todos los bits mediante XOR B. A través de 
?<X11110000=8(F0, se invierten los 4 bits superiores. 

Para utilizar el programa también en MODE 1 debemos modificar el 
segundo valor de la línea 60 de DATAS, de 8<FF a í<F0. 

En MODE 0 únicamente los bits 6 y 7 se responsabilizan de los 
puntos. Realice con este objeto la necesaria modificación del 
programa. 


4.8 COMANDOS DE ROTACION Y DESPLAZAMIENTO 


¿Qué se entiende por desplazamiento de las cifras de un número? 


4 3 2 1 0 

10 10 10 10 10 


3 7 3 0 

3 7 3 0 0 

3 7 3 


Desplazamientb hacia la izquierda! 
Desplazamiento hacia la derecha! 




Los Comandos 


119 


En el sistema decimal, un desplazamiento hacia la izquierda 
ocasiona una multiplicación por 10 (base del sistema decimal), y 
un desplazamiento hacia la derecha ocasiona una división entre 10. 
(Un desplazamiento de las ci-fras hacia hacia la izquierda 
significa un desplazamiento de la coma una posición hacia la 
derecha). 

En el sistema binario, un desplazamiento hacia la izquierda o 
derecha significará respectivamente una multiplicación por 2 o una 
división entre 2. En BASIC no existe ningún equivalente directo 
para estos comandos (será pues la multiplicación o la división 
por o entre 2). 

El Z80 posee 76 comandos de este tipo, de los cuales, la mayoría 
utilizan el direccionamiento implícito, indirecto o indexado. 
Existen varias formas de rotación y de desplazamiento. En primer 
lugar distinguiremos entre las operaciones rotar y desplazar. 

Desplazar: Al correr hacia derecha e izquierda, el contenido del 
registro se mueve bit a bit en la dirección correspondiente. El 
bit que sobra al realizarse el desplazamiento es recogido en el 
flag de acarreo. El espacio que queda libre al otro lado del byte 
se rellena con cero. 



Desplazamiento aritmético a la izquierda 



Desplazamiento lógico a la derecha 
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^1 aplicar el comando SRL a números con signo se origina un error. 
£1 bit 7 del signo, se desplaza al lugar del bit 6. En la posición 
del bit 7 se inserta un 0. Por ello, un número negativo (bit 7=1) 
se convierte en positivo (bit 7=0). El comando SRA evita este 
error. En este comando, al bit incluido a la izquierda es idéntico 
al bit de signo. Es decir, será 0 cuando el bit izquierdo también 
lo sea (+) y 1 cuando el bit izquierdo sea 1 (-). Dado que este 
comando tiene en cuenta el significado aritmético del séptimo bit, 
se le denomina comando de desplazamiento aritmético, y no lógico. 


BitvQr 


Desplazamiento aritmético a la derecha 


Dib. 8 


Rotar: Contrariamente a la operación de desplazamiento, en la 
rotación, el bit que se inserta es, o bien el bit de acarreo o 
el que se desplaza fuera del byte por el extremo opuesto. 

En el Z80 existen 2 tipos de rotación: 

Rotación de 8 bits (sin carry) 

Rotación de 9 bits (con carry) 

En una rotación de 9 bits hacia la derecha, se desplazan los 8 
bits una posición hacia la derecha, el bit del extremo derecho se 
traslada al carry, y el bit que se inserta por el extremo 
izquierdo corresponde al antiguo contenido del carry (antes de la 
inserción del nuevo bit del extremo derecho). Dado que en este 
caso rotan los 8 bits del byte y el carry (el bit 9), a este tipo 
de rotación se la denomina: rotación de 9 bits. 
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Rotación derecha a través del Carry 



Rotación izquierda a través del Carry 


Dib. 9 Rotación 9 bits 


En la rotación de 8 bits, rotan únicamente los 8 bits del 
registro. En el carry sólo se almacena el bit desplazado. Sin 
embargo, el anterior contenido del carry no se desplaza con los 
bits restantes. El bit desplazado -fuera del byte, se recoge 
nuevamente por el extremo opuesto del registro. 
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Rotación derecha 



Rotación izquierda 


10 Rotación de 8 bits 


Por otro lado existen asimismo 2 comandos especiales para la 
rotación de ci-fras (bloques de 4 bits) en formato BCD. 

RLD y RRD (D; Digit: dígito). Estos comandos rotan 2 dígitos de 
la posición de memoria indicada por HL, y el dígito contenido en 
la mitad inferior del acumulador. 

En general los comandos de rotación y desplazamiento tiene un 
código de operación de 2 bytes. El primer byte del Opcode es 
siempre S<CB (en los comandos de direccionamiento indexado !<CB 
corresponde al 2do. byte del opcode, ya que el primero es siempre 
!<DD o bien !(FD. Excepción: RRD/RLD comienzan con ED). Ya que los 
comandos de rotación son útiles en operaciones aritméticas, se 
establecieron otros 4 comandos, que operan por medio del ACU y 
poseen un Opcode de 1 byte. Estos comandos resultan por ello la 
mitad de largos y se ejecutan en la mitad de tiempo que los 
comandos estándar. 
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Normal" 

"Especial-ACU 

RLC 

A 

RLCA 

RRC 

A 

RRCA 

RL 

A 

RLA 

RR 

A 

RRA 


Los -flags S y Z se in-fluyen en la -forma habitual mediante los 
comandos normales de rotación y de desplazamiento. El -flag P/V 
indica la paridad. El contenido del carry es el correspondiente 
bit, que se desplaza -fuera del byte. Los comandos especiales para 
el acumulador sólo modi-fican el -flag C, mientras que los -flags S, 
Z y P permanecen inalterados. Los comandos de rotación BCD RLD/RRD 
sólo in-fluencian los -flags S, Z y P en la -forma antes citada, pero 
no in-fluyen sobre el carry. 

Ejemplo: 

SRL C C: !<36 

00110110 :!<36 

0~> 0011011 —>0 al Carry 

00011011 tregistro C después de la ejecución 

0 :carry después de la ejecución 

SRL ocasiona una división entre 2: ?(36''2=$<1B 

SRA (HL) HL:S(B100 posición de memoria !<B100:!<C2 

11000010 !Í<C2 

11100001—>0 : Carry 

11000010 0 :CF: (HL) después de la ejecuci ón=!<El 

(» Bit 7 permanece en esta posición) 

Como complemento a dos, signi-fica: 


!<C2 = -62 
«<E1 * -31 
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El comando SRft e-fectúa correctamente la división de los números 
con signo, de lo contrario SRL (HL) habría contenido Sí 61 = 97 como 
resultado, que no es la mitad de -62 sino de 194, que corresponde 
a ?<C2 como número carente de signo. 

RLC D 

D: !<E4 Carry=l 

?<E4 = S<X11100100 

Nuevo Carry <— 11100100 <— l=Antiguo Carry 

11001001 

Contenido de D después de la ejecución: StCS 
Carry-F = 1 

Como vemos !(C5 no es el doble de Í<E4. El motivo del error está en 
que un bit ha rotado hacia el carry. Asi pues, !<1C5 debiera 
representar el doble de !<E4, lo que no es correcto dado que el 
contenido antiguo del carry (=1) entró por el extremo opuesto. 
Entonces el doble de Í<E4 es S(1C9-1=!<1C8. 

Si se han de rotar números compuestos de varios bytes, el bit 
desplazado del byte que se acaba de rotar, se introduce por RLC o 
RRC mediante el carry, hacia el interior del siguiente byte. (ver 
programa ai -final del capítulo) 

RRA 

ACU: 8<76 

í<76 = &X011101 lio 

ScXtOlllOllO -> carry 

(* en este punto rota "hacia dentro" el anterior bit 0) 

ACU: Í(X00111011 CF=0 

Contenido del acumulador : S(3B 

!(3B»2 = S<76 
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Mufonic 

RLCA 

RLA 

RRCA 

RRA 


Syakolk 

O^mckM 


* 


H<* 


O^oá* 


76 543 210 


No. 

al 

tyte> 


No. 

oTM 

Cyctw 


No. 

ofT 


00 001 111 


00 011 111 


Coainofits 


RoUtc left drcuUr 
•ccumulator 


Rotale left 
aocumulator 


Roíale lifht circuUf 
accumuUtor 


Roíale lisht 
accumuUtor 


RLCr 
RLC (HL) 
RLC (IX+d) 

RLC (lY+d) 

RLm 

RRCm 




Lr— 


t 0 0 11 001 011 2 

oo fóool r 

I 0 0 11 001 011 2 

ooFóogliio 

t 0 0 11 011 101 4 

11 W1 011 

- d - 

oo fóo^ tio 

t o o 11 111 101 4 

11 001 011 

- d - 
OO foÓQl llO 

t o o fólol 


too fóón 


RR m 




t P t 0 0 fóTTl 


2 

4 


6 


6 


8 

IS 

23 

23 


Roíate left circular 
regiiter r 

r Rof. 

000 B 

001 C 

010 D 

011 E 

100 H 

101 L 

111 A 


Instruction fonnat and 
atatei are as shown 
for RLC,m. To form 
Mw OP<ode replace 
POOlof RLC-m with 
ihown code 


SLA m 


R«- l’ — it »-« 

■ •t.(Nunx«e).<nr«4t 


I p t 0 0 QSD 


SRA m 

SRLm 

RLD 


RRD 


■ ■«.(Nii. ex*«).(rr*<) 


»— I’ —- «t — 



t p I 0 0 fion 

t p t o o irm 

t P I o o 11 101 101 
01 101 111 

t P I o o 11 101 101 
01 100 111 


s 


s 


18 Roíale difit left arul 

righl between the 
accumuUtor 
and location (HL). 

18 Hm contení of the 

upper half of the 
accumuUlM U 
uruffécted 


Plag Notatton: • ■ (Uf not affected. 0 ■ flag retel. 1 • flag tel, X ■ fUf te unknown. 
I ■ tU| te affected accordinf to the reiult the opeiatioa. 
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APLICACION 

La aplicación estándar para los comandos de rotación y 
desplazamiento se utiliza al realizar cálculos. En nuestro ejemplo 
queremos utilizarlos para el desplazamiento de la pantalla. 

Con ayuda de los comandos de transferencia de bloques es posible 
desplazar la pantalla en dirección horizontal, carácter por 
carácter. Con los nuevos comandos podemos realizar un 
desplazamiento bit por bit. 


El listado de ensamblador: 


AOOO 

97 

10 

SUB 

A 

AOOl 

2100CO 

20 

LD 

HL,!(C000 

A004 

CB3E 

30 

SRL 

(HL) 

A006 

23 

40 

INC 

HL 

A007 

BC 

50 

CP 

H 

A008 

20FA 

60 

JR 

N2,SíA004 

AOOA 

C9 

70 

RET 



Reconocerán la estructura básica del bucle, con el cual se 
incrementa HL desde !<C000 hasta ÍíFFFF. 

El primer comando es nuevo. 

SUB A,A se utiliza en lugar del comando LD A,0. SUB A,A borra el 
ACU. Este comando es más rápido porque está direccionado de -forma 
implícita. 

LD A,0 se direcciona de -forma inmediata, es decir que los datos 
(0!) deben leerse adicionalmente. Ahora lo -fundamental del 
programa: 

SRL (HL) 

Dado que HL debe recorrer el área completa de direcciones, hemos 
elegido el direccionamiento indirecto. SRL desplaza los 8 bits de 
cada byte de la pantalla en una posición hacia la derecha. 
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Modifique el programa en lineas DATA con ayuda del listado de 
ensamblador y cárguelo con el cargador BASIC a partir de dirección 
't<A000. El programa desplaza hacia la derecha cada carácter de la 
pantalla. Dado que ignoramos el bit desbordado por la derecha los 
caracteres tienen un bit truncado por la derecha. 

Introduzca lo siguiente: 

FOR 1 = 1 TO 8: CALL ÍíAOOO: NEXT 

Con este comando se borra la pantalla. Los caracteres desaparecen 
bit por bit por la derecha, porque en el comando SRL el bit que 
entra por la izquierda tiene valor cero (ningún punto). 

Reemplazamos SRL (HL) por SLA (HL>. 

El código para este comando es: Í(C6,i(2S. Introduzca las líneas 
DATA para el quinto elemento ?<25 (en lugar de !<3E) y cargue el 
programa nuevamente con RUN. Este programa tiene efecto similar, 
pero el desplazamiento se realiza hacia la izquierda. 

Intente asimismo SRA (HL), código S(CB,S(2E. El quinto byte en las 
lineas DATA es entonces !(2E. Después de que el bucle FOR-NEXT se 
ejecuta 8 veces, se forma en la pantalla una configuración 
extraña. Esto se produce porque el comando SRA, deja el bit 7 en, 
su posición. Después de la ejecución múltiple del comando todos 
los bits obtienen el antiguo valor del bit 7. 

De la letra R del mensaje ’READY’ obtenemos 2 líneas horizontales 
(después de ejecutar 8 veces). La razón para ello es la 
configuración de bits de esta letra. 

76543210 Número de Bit 

2 *t U 

3 t* U 
Linea 4 tttU 

5 t* tt 

6 U U 

7»*» « 

8 
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Cada carácter se representa de esta manera en una matriz de 8X8. 
En el caso de R, el bit 7 solamente está activado en linea 1 y 
línea 7a. Si ejecuta las ocho llamadas de programa máquina 
consecutivamente podrá observar que la R se desplaza dejando una 
raya en líneas 1 y 7. 


La e del mensaje Ready, desaparece totalmente porque en este 
carácter no hay ningún bit 7 activado. De la a queda una raya en 
línea 6, de la ’d’ en líneas 4, 5 y 6 y de la 'y’ ninguna raya. 

A través de estos resultados esperamos se aclare la razón por la 
cual el comando SRA se denomina como aritmético y el comando SRL 
en cambio como lógico. Intenten introducir asimismo los restantes 
comandos en su programa. 


RRC tiene el código S<CB,S(DE; RLC tiene el código S/CB,?<06. 
Modi-fique el cargador y ejecute el programa 8 veces con el bucle 
FOR-NEXT. Podemos observar claramente por qué estos comandos se 
denominan comandos de rotación. Cada carácter rota, es decir, los 
bits que se desbordan por la derecha/izquierda (para RRC/RLC) se 
integran por el lado opuesto. Después de la octava ejecución, la 
pantalla se encuentra nuevamente en el estado inicial. 

Nos quedan aún los comandos de rotación de 9 bits, RL (Código 
Í(CB,!<16) y RR (código S<CD,?<1E). 


Con la llamada del programa a través de RR, la pantalla obtiene la 
muestra de rayas. Después de cada llamada consecutiva, se observa 
que las lineas se vuelven más gruesas, hasta que finalmente la 
pantalla queda totalmente en blanco después de 8 llamadas. Esto en 
ningún caso es el resultado esperado. Mediante la rotación de 8 
bits, el contenido de la pantalla debería haberse desplazado en un 
bit en la dirección correspondiente. 
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CUATRO BYTES DE PANTALLA ANTES DE LA EJECUCION 



DESPUES DE LA EJECUCION REPETIDA DE RR 



^ ^ ^ 


Dib. 11 APLICACION ROTACION 9 BITS 


El contenido debería desplazarse en un bit hacia la derecha, porque 
el bit rotado se almacena en el carry y a continuación vuelve a 
rotarse al bit siguiente. 

Dado que no hemos obtenido el resultado esperado, por lo visto hay 
un error en el programa. 

Intenten encontrar este error y busquen una solución. 

(Consejo: observen la influencia de los flags!) 

Como siempre está activado el primer bit de un carácter después de 
cada ejecución las "rayas" de la pantalla) y este bit se extrae 
del carry flag, el carry siempre ha contenido 1. De esta manera no 
correspondía al último bit del byte anterior. ¿Cómo es posible? 
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Veamos los restantes comandos del programa. Después de la rotación 
tenemos el comando INC HL. Los comandos de contador de 16 bits, no 
influencian los -flags. Ahora tenemos CP H. ¡Aquí tenemos el error 
buscado!. 

El objeto del comando CP es activar -flags, in-fluyendo el carry en 
cada paso del bucle. Dado que H es mayor que A (A=0), el carry se 
activa cada vez (excepto en el primer paso). El carry -flag 
activado se rota mediante PR en la pantalla y ésta se queda en 
blanco. 

Como solución a este problema se nos presentan 2 posibilidades: 

1. - Almacenar temporalmente los -flags antes de cada comando CP 

2. - Evitar la alteración de -flags 

Con re-ferencia al punto 1: con los comandos de pila es posible 
salvar el registro P en la pila (inmediatamente a continuación del 
comando de rotación), extrayéndolo nuevamente de la pila 
(directamente antes del comando de rotación). Después de RR debe 
introducirse PUSH AF (almacenar en la pila) y delante de RR el 
comando POP AF (extraer de la pila). Hemos de tener en cuenta 
además no desordenar la pila. 

El primer comando de pila en nuestro programa sería como se ha 
descrito arriba POP AF, pero esto sería -falso, porque mediante el 
mismo se extraen datos de la pila que no se encuentran aún en la 
misma. De esta -forma extraíamos la dirección de retorna. 

El programa bi-furcaría a una dirección errónea, al intentar un 
retorno. Por ello debemos insertar PUSH AF una vez antes del bucle 
y después del bucle (delante de RET) POP AF. 

Tengan en cuenta el orden correcto al utilizar PUSH y POP. Después 
de estas mejoras, nuestro programa se representa de la siguiente 
forma: 
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AOOO 

97 

10 

SUB 

A 

AOOl 

F5 

15 

PUSH 

AF 

A002 

21COCO 

20 

LD 

HL,!<C000 

A005 

F1 

25 

POP 

AF 

A006 

CBIE 

30 

RR 

HL 

A008 

F5 

35 

PUSH 

AF 

A009 


40 

INC 

HL 

AOOA 

BC 

50 

CP 

H 

AOOB 

20FB 

60 

JR 

NZ,!<A005 

AOOD 

F1 

65 

POP 

AF 

AOOE 

C9 

70 

RET 



Si un programa BASIC necesita un minuto para este desplazamiento 
de un bit, este programa máquina es casi demasiado lento. Debido a 
los 2 comandos de pila en el bucle que se ejecuta 16000 veces, el 
programa se prolonga innecesariamente. Para evitar esta desventaja 
referente a la velocidad de ejecución, les indicamos ahora la 
segunda posibilidad. 


Con referencia al punto 2: para que funcione el comando JR NZ 
dejando el carry inalterado, necesitamos un comando que influya el 
flag Z pero no el flag C. Esto nos ofrecen los comandos da 
contador de 8 bits. Para incrementar la pareja de registros HL, 
son necesarios 2 comandos de contador de 8 bits. En primer lugar 
incrementamos el LoM-by^e. Si L después del incremento no es D, el 
bucle se repite. 

Si L en cambio es 0 debe incrementarse H en 1. 

Ejemplo: 


después del incremento: 
después del incremento: 


H=í<C0 L=ííFE HL=í<C0FE 

H=í<C0 L=!(FF HL=!<C0FF 

H=!(C1 L=S<0 HL=?<C100 


La nueva porción de programa: 


INC L 

JR NZ,Dirección 
INC H 

JR NZ,Dirección 
RET 
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Además podemos omitir el comando SUB A, porque ya no utilizamos el 
ACU. 

Listado de Assembler: 


AOOO 

97 

10 

SUB 

A 

AOOl 

F5 

15 

PUSH 

AF 

A002 

2100CO 

20 

LD 

HL,!<COOO 

A005 

F1 

25 

POP 

AF 

A006 

CBIE 

30 

RR 

HL 

A008 

F5 

35 

PUSH 

AF 

A009 

23 

40 

INC 

HL 

AOOA 

BC 

50 

CP 

H 

AOOB 

20FB 

60 

JR 

NZ,!(A005 

AOOD 

F1 

65 

POP 

AF 

AOOE 

C9 

70 

RET 



Active el programa en líneas DATA con: 

60 DATA ?<21,Í<00,!<C0,Í<CB,S<1E,Í<26,!<20,S<FB 
70 DATA «<24,Í<20,«(F8,S<C9 

Cargue el programa con el cargador BASIC y pruébelo con RUN. 

El comando RRD: Altera ?<CB (Byte 4) en ?<ED y t<lE en S<67. Después 
de cargado, ejecute el programa con diferentes 4 bits (1 cifra 
BCD). 

Compruébelo son el siguiente programa BASIC: 

10 FOR K=1 TO 4 
20 FOR 1=0 TO 11 

30 LOCATE (K-1)*8+1,12-1:PRINT "HOLA" 

35 LOCATE (K-1)*8+1,12+1:PRINT "HOLA" 

40 FOR J=0 TO K 
50 CALL 8<A000 
60 NEXT J 
70 NEXT I 
80 NEXT K 
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4.9 COMANDOS DE MANIPULACION DE BITS 

En el capítulo 4.7 se mostró cómo pueden utilizarse las 
operaciones lógicas para activar o desactivar bits individuales o 
grupos de bits en el ACU. Sin embargo, es útil poder activar o 
desactivar un bit individual en un registro o posición de memoria 
deseados. Debido a que ello supone necesariamente la ejecución de 
un elevado número de comandos, la mayoría de las CPUs disponen 
para ello de muy pocos o ningún comando. A este respecto, el 280 
posee un "surtido" de 120 comandos de manipulación de bits que 
incluye comandos de comprobación de bits. 

Los comandos de comprobación de bits verifican si un bit 
determinado se encuentra en estado de "activado" o "desactivado" 
en un registro o en una posición de memoria. Según el resultado de 
la comprobación se activa o desactiva a su vez el Zero-Flag. El 
carry no se influye, y los flags S y P/V quedan indeterminados 
después de la ejecución (!). Los dos comandos para activar (SET) o 
desactivar (RES) bits, no ejercen ninguna influencia sobre los 
flags. 

Todos los comandos de manipulación de bits comienzan con el código 
de operación ?<CB (excepto los comandos de direccionamiento 
indexado). El segundo código de operación resulta del número del 
bit y del código del registro. 

Para acceder al Byte afectado se dispone de los siguientes 
direccionamientos! 

- Implícito : registros A, B, C, D, E, H, L 

- Indirecto : (HL) 

- Indexado : (IX+d) y (lY+d) 


Formato: 


BIT b,rBg 
RES b,reg 
SET b,reg 


BIT b,(HL) 
RES b,(HL) 
SET b,(HL) 


BIT b,(XY+des) 
RES b,(XY+des) 
SET b,(XY+des) 
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b = número de bit 

El número de bit b, se codifica de la siguiente forma: 


0 

- 000 

4 - 

100 

1 

- 001 

5 - 

101 

2 

- 010 

6 - 

lio 

3 

- 011 

7 - 

111 


Todos estos comandos también se consideran como comandos de 
direccionamiento de bits, debido a que el correspondiente bit se 
indica en el código de operación. 

Ejemplos: 

BIT 6,B B:í<33 

!íX00110011 = í<33 

t 

76543210 - número de bits 

»; el bit número 6 es 0. 

Dado que el bit 6=0, el flag Z se activa a 1, después de la 
ejecución: 

B=!<33 Flags: S Z V C 

U 1 U U= Flags S y V desconocidos 

RES 1,(HL) HL:!<ft975 

S<1975 = !<23 

!<X00100011 = S(23 

t 

76543210 - número de bit 
tt El bit número 1 se desactiva 


«.XOOlOOOOl = S(21 
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Posición de memoria ?<A975 después de la ejecución; Íí 21 
Flags: S Z V C 

- ninguno afectado 

SET 7,C C: S<7F 

SíXOlllllll = !<7F 

« 

76543210 - número de bit 
»: El bit número 7 se activa 

Í(X11111111 = ?(FF 

El flag-C después de la ejecución es !<FF 
Flags: S Z V C 

- ninguno afectado 


Analogías en BASIC 

Intentemos ejecutar el comando SET b,A en BASIC: 

El bit b debe activarse. Con el comando OR tenemos la posibilidad 
de activar determinados bits. El bit b tiene el valor de posición 
2''b. Obtenemos entonces: 

SET b,A BASIC: A=A OR (2''b) 

Con el comando RES ocurre algo similar: 

RES b,A BASIC: A=A AND (255-2''b) 

Los comandos especiales SCF y CCF: 

Dado que el bit 0 se utiliza con bastante frecuencia en el 
registro F (el carry), existen para ello 2 comandos especiales. 
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SCF inserta en el carry el valor 1. 

CCF complementa el valor del carry-F, es decir, de C=0 lo 
convierte en C=1 y viceversa. 

Estos son los únicos comandos con los que podemos afectar 
directamente los flags. 

El carry puede borrarse también con los comandos lógicos. 

Los comandos CCF y SCF se encuentran en la lista correspondiente 
de comandos al final del capítulo 4.11. 
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_Üü!_ 

ord-odd 

No. 

No. 

No. 





■ 

a 

n 

■ 

■ 

■ 

— 






Symbolle 

■ 


ll 


m 

1 




oT 

oTM 

oíT 



Maawook 

O^fttkNi 

B 

B 


B 

D 

y 

H 54S 210 

Bytaa 

CyelM 

SiStM 

CoauMols 

BIT b.f 


• 

t 

X 

X 

0 

1 

11 

001 

011 

2 

2 

• 

t 

Rn. 









01 

b 

r 




000 

B 

firr b. (HL) 


• 

t 

X 

X 

0 

1 

11 

001 

011 

2 

J 

12 

001 

010 

c 

D 


z-(i3ra) 







01 

b 

lio 




011 

E 

BIT b. (IX^) 

• 

t 

X 

X 

0 

1 

11 

011 

101 

4 

5 

20 

100 

H 









11 

001 

011 




101 

L 















111 

A 










d 








z-ilV^),, 







01 

b 

lio 




b 

Bit Testad 

Brr b.(iY+d) 

• 

t 

X 

X 

0 

1 

11 

111 

101 

4 

5 

20 

000 

0 








11 

001 

011 




001 

1 












010 

2 









♦" 

d 





011 

3 









01 

b 

lio 




100 

4 















101 

S 















no 

6 















iti 

7 

SET b, r 

'b*"' 

• 

• 

• 

• 

• 

• 

11 

001 

011 

2 

2 

1 











m 

b 

r 






SETb.(HL) 


• 

• 

• 

• 

• 

• 

11 

001 

011 

2 

4 

IS 











[M] 

b 

lio 






SET b. (IX^) 

(IX*d)^ - 1 

• 

• 

• 

• 

• 

• 

11 

011 

101 

4 

6 

23 











11 

001 

011 














«. 

d 

-• 














m 

b 

lio 






SET b. (lY+d) 

(IVd)^-l 

• 

• 

• 

• 

• 

• 

ti 

111 

101 

4 

6 

23 











11 

001 

011 














- 

d 















[m b 

lio 






RES b.m 

S-0 







M 






To fonn new OP- 

m3r.(HL). 

(IXtd), 

(IV*d) 












code repUce [ül 
of SET b.m wlui 
fnSI. Fltgi «nd time 














sutes for SET 
instruction 



NoIm: Tht notaüon indlcatM bit b (0 to 7) oc locatioti t. 

Flaf Nottlkm: • ■ flag not anécted, 0 ■ flaf fCKt. I * flif wi. X • flag is unknown, 
I ■ Aag M afTcctcd according to Ihc itsull of Ihe operalion. 
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PROGRAMA PARA LA MANIPULACION DE BITS 


Con+eccione un programa que llene la pantalla de rayas de un punto 
de ancho y posiclonadas en el centro de un carácter, en modalidad 
2. Utilice nuevamente el bucle del programa anterior. 

Listado de ensamblador 


AOOO 

2100C0 

10 

LD 

HL,!<C000 

A003 

CBDE 

20 

SET 

3, (HL) 

A005 

2C 

30 

INC 

L 

A006 

20FB 

40 

JR 

NZ,?(A003 

A008 

24 

50 

INC 

H 

A009 

20F8 

60 

JR 

NZ,!<A003 

AOOB 

C9 

70 

RET 



Programa BASIC: 

5 MEMORY S<9FFF 

10 FOR i=í<A000 TO !<A00B 

20 READ a 

30 POKE i,a 

40 NEXT i 

50 MODE 2 

60 CALL S<AOOO 

70 END 

100 DATA «(21,!<00,Í<C0,!<CB,&DE,!(2C,Í<20,!(FB 
lio DATA Í<24,S<20,!<FB,S<C9 


En lugar de SET 3,(HL) puede utilizarse SET 4,(HL) código: 
ííCB,!<E6. En las lineas DATA ha de reemplazar el !<DE por !(E6. 
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4.10 BIFURCACIONES 


Gran parte de las bi-furcaciones son condicionadas, es decir que 
dependen del estado adoptado por los -flags; por ello describiremos 
en este apartado nuevamente, de Forma resumida, el papel que juega 
cada Flag. 

Los Flags H y N se utilizan en la aritmética BCD, no pueden 
comprobarse. Los demás Flags (C, P/V, Z y S) pueden comprobarse. 

Carry-Flag (Flag de acarreo) 

El Flag de acarreo tiene 2 Funciones: 

- Indica si se ha producido un acarreo en una adición o 
sustracción. 

- Los comandos SRL, SRA, SLA, RR, RL, RRC, RLC, RRA, RLA, 
RRCA, y RLCA utilizan el carry como noveno bit. 

Una excepción la constituyen los comandos de rotación RLD, RRD en 
BCD. Estos comandos no aFectan al carry. 

Los comandos lógicos AND, OR y XOR ponen el carry siempre a ceros, 
y pueden utilizarse para desactivar el carry. Los comandas 
siguientes producen una alteración del carry: 

NEG: Se activa el Flag C si antes de la ejecución del comando, A 
tenía el valor 0. 

DAA: Este comando aFecta al carry de Forma compleja. Se utiliza 
para la realización de cálculos en Formato BCD. 

SCF: Set Carry Flag. 

Este comando activa el carry en 1. 

CCF: Complement Carry Flag 

Este comando complementa el carry. 
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i Los restantes comandos no afectan al carryl 
Parity/Over-flow (Paridad/Desbordamiento -P/V) 

Este -flag tiene varias funciones, dependiendo del comando 
ejecutado. 


- Desbordamiento 

En las operaciones aritméticas ftDD de 8 bits, ADC, SUB, SBC, INC 
de 8 bits, DEC de 8 bits, NEG y CP, se indica un desbordamiento. 
Esto significa que el signo de un número ha sido modificado con 
error. 

Excepciones: ADD de 16 bits, INC de 16 bits, DEC de 16 bits. 

Estos comandos no afectan sobre el flag V. 


- Paridad 

En los comandos INPUT (IN), en los de rotación y en los de 
desplazamiento RR, RL, RRC,. RLC, RLD, RRD, SLA, SRA y SRL, en los 
comandos lógicos AND, OR, XOR y en DAA, este flag se utiliza como 
flag de paridad P. P tiene valor 1 cuando la cantidad de ’l’ de un 
byte es par, y tiene valor 0 cuando el número de bits activados es 
impar. 

Excepción: IRLA, RRA, RLCA, RRCA no afectan P! 

- En los comandos de bloque LLD, LDI, CPD, CPI, CPDR y CPIR, se 
desactiva P/V, en caso de que BC=0 (BC representa el registro 
contador), en caso contrario, se activa. 

Por esta razón, P/V siempre se desactiva con LDDR y LDIR. 


- Flag de interrupción. 
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Con UD A, I y LD A,R el -flag P/V toma el valor del Interrupt- 
Enable-Flip-Flops (IFF), activándose a 1 cuando admite 
interrupciones enmascaradles y desactivándose con 0 cuando no 
acepta las mismas interrupciones. 

ATENCION: El comando BIT y todos los comandos de Entrada/Sal ida de 
bloques, activan este -flag modi-ficando su contenido en algunos 
casos. Otros comandos no influyen sobre el mismo. 


Zero-Flag (Cero,Z) 


El flag Z indica si el valor de un byte es nulo, es decir si el 
valor es 0, al flag Z se activa, de lo contrario se desactiva. 

En los comandos de comparación, Z se activa (1) cuando existe una 
igualdad, de lo contrario se desactiva (0). 

En el comando BIT, el Flag Z se activa cuando el bit comprobado es 
0, de lo contrario se desactiva. 

Los siguientes comandos influyen sobre el flag Z: 


Aritméticos 

ATENCION 

Comparaci6n 
Bit 

Rotación/desplazamiento 
ATENCION 

BCisqueda/Bloque 

Entrada 

Comandos de carga 


ADD,ADC,SUB,SBC,INC,DEC,NEG,DAA 
ADD de lé) bits no influye el flag! 

CP: Z=1 si igualdad, Z=0 no hay igualdad 
BIT 

RR,RL,RRC,RLC,SRL,SRA,SLA,RLD,RRD 
RRA,RLA,RRCA,RLCA no influyen el flag! 
CPI,CPIR,CPD,CPDR: Z=1 por igualdad 
IN 

LD A,I o bien LD A,R 


Entrada/Salida de bloques: INI, IND, OUTI, OUTD activan a Z (1) si 
tras su ejecución B“0; y INIR, INDR, OTIR, OTDR activan Z en todos 
los casos. 

¡Todos los restantes comandos no afectan sobre Z! 


SIGN-Flag (Signo, S) 
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El -flag de signo contiene el valor del bit más alto de un byte. 
Este bit, corresponde al signo en la aritmética con signo. 

Los siguientes comandos afectan el flag S; 

Todos los comandos aritméticos o lógicos: 

ADD,ADC,SUB,SBC,INC,DEC,NEG,DAA,AND,OR,XOR,CP 

Los comandos de rotación y desplazamiento; 
RL,RR,RLC,RRC,SRL,SRA,SLA,RLD,RRD. 

Los comandos de búsqueda de bloque: CPD,CPI,CPDR,CPIR. 

Los comandos de entrada IN y los comandos de carga LD A,I y LD 
A,R. 

ATENCION: los comandos: ADD de 16 bits, INC de 16 bits, DEC de 16- 
bits, RLA,RRA,RLCA,RRCA no afectan este flag!!. 

El comando BIT y los comandos de entrada/salida de bloques, INI, 
IND,OUTI,OUTD,INIR,INDR,OTIR,OTDR alteran el estado del flag S, 
dejándolo en un estado indeterminado. 

En el aneViO encontrará información sobre la influencia de los 
flags para cada comando. 

En el Z80 existen 5 modalidades diferentes de bifurcación. 

- Bifurcaciones dentro del programa principal (JUMP) que 
corresponden al comando BASIC "GOTO’. 

- Bifurcaciones a subprogramas (CALL y RET), que corresponden a 
los comandos BASIC ’GOSUB' y 'RETURN’. 

- Bifurcaciones relativas (JUMP RELATIVE) semejantes al comando 
BASIC ’FOR-NEXT’. 

- Comandos RESTART (RST), que realizan una bifurcación a una 
dirección previamente determinada. El comando RST no posee 
análogo BASIC. 

- Bifurcaciones de interrupción (ver comandos de control). 
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Los tres primeros tipos de bi-furcación existen como 
incondicionales y condicionales en el Z80, dependiendo del estado 
de un tlag. 

En los comandos de bi-furcación condicional, se realiza la 
bifurcación según el estado de los flags 2, C, P/V y S. Cada flag 
puede comprobarse por el valor 0 ó 1. 

En lenguaje ensamblador, se utilizan las abreviaciones siguientes: 


2 

X 

Bifurcación 

Si 

valor es nulo 

(2=1) 

N2 

= 

Bifurcación 

si 

valor es NO nulo 

(2=0) 

C 

X 

Bifurcación 

si 

existe acarreo 

(C=l) 

NC 

= 

Bifurcación 

si 

NO existe acarreo 

(0=0) 

PO 

X 

Bifurcación 

si 

paridad es IMPAR 

(P/V=0) 

PE 

= 

Bifurcación 

si 

paridad es PAR 

(P/V=l) 

P 

= 

Bifurcación 

si 

POSITIVO (+) 

(8=0) 

M 

= 

Bifurcación 

si 

NESATIVO (-) 

(8=1) 


El 280 reconoce también un comando de control de bucles, que 
decrementa el registro B y ejecuta luego una bifurcación relativa, 
toda vez que el registro BOO. Este comando se codifica DJN2 
(Decrement Jump Non 2ero). 

JUMP 

Las bifurcaciones dentro del programa principal se ejecutan con el 
comando JP. La dirección de bifurcación puede indicarse por medio 
de 2 modalidades: 

Direccionamiento absoluto: 

Formato: 

JP dirección o bien JP cond,dir 

(cond representa una condición (Condition), es decir, para 
Z,N2,C,NC,P0,PE,P ó M) 
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JP dirección - Bi-furcación incondicional a la dirección dada. 

JP Cond,dirección - Si la condición se cumple, bi-furca a la 
dirección dada. Si la condición no se cumple, se ejecuta el 
siguiente comando. 

Analogías BASIC: 

JP dir BASIC: GOTO Número de línea 

JP NZjdir BASIC: IF Z=0 THEN GOTO número de línea 

JP Z,dir BASIC: IF Z=1 THEN GOTO Número de línea 

El procesador realiza una bi-furcación leyendo la dirección dada en 
el PC. Entonces, se lee y ejecuta en esta posición el siguiente 
código de comando. 

En el direccionamiento absoluto, al código de operaciones de 1- 
byte le sigue la correspondiente dirección de bifurcación en la 
forma Low-byte High-byte. Dado que todos los comandos de 3 bytes 
son relativamente lentos, se crearon los saltos relativos debido a 
que éstos son comandos de únicamente 2 bytes. Las bifurcaciones de 
direccionamiento indirecto tienen un código de operaciones de 1 
byte. 

Direccionamiento indirecto. 

Formato; 

JP (X) 


X: HL, IX o lY 

JP (X) bifurca a la dirección indicada por el registro X. 

CALL/RET 

Ya hemos descrito cómo se almacenan o leen las direcciones de 
retorno CALL y RET. Una llamada a un subprograma puede ser 
condicional o incondicional. La dirección de bifurcación 
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(dirección inicial del subprograma), se indica por 
direccionamiento absoluto. 

Formato: 

CALL dir o bien CALL cond,dir 

En la ejecución del comando, todas las operaciones necesarias se 
realizan en el stack, en SP y en PC. El -funcionamiento de este 
comando es el siguiente: 

Una vez completada la lectura del comando, PC indica el siguiente 
comando a ejecutar. A continuación se realizan las operaciones: 

(SP-1)=PC - (High byte) 

(SP-2)=PC - (Low byte) 

SP=SP-2 

PC=dir 

El siguiente comando se lee de la dirección que indica el PC. Para 
finalizar un subprograma se coloca un comando RET. El RETURN puede 
ser asimismo condicional o incondicional. 

Formato: 

RET o bien RET cond 

Al ejecutar el comando RET, ocurre lo siguiente: 

PC - (Low byte) = (SP) 

PC - (High byte) = (SP+1) 

SP=SP-f2 

La ejecución del programa se continúa en la dirección recogida del 
stack. 

El comando RET, contrariamente al comando CALL, sólo tiene 1 byte 
de longitud. En el comando CALL debe indicarse la dirección de 16 
bits, es decir que este comando tiene una longitud de 3 bytes. 
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Existen 2 bifurcaciones especiales de retorno: RETI y RETN, que se 
describen en el capítulo referente a los comandos de control. 

RESTART 

Este tipo de comando de salto tiene una longitud de 1 byte y por 
esta razón se ejecuta a mayor velocidad que los restantes comandos 
de bifurcación (sin tener en cuenta el comando RET). El comando 
RST, que en lo sucesivo denominaremos Restart, ocasiona un salto 
de un subprograma a una dirección localizada en la parte inferior 
de la memoria. Existen 8 comandos Restart. Las direcciones de 
bifurcación del restart son 0, S<8, !<10, MS, &20, !<28, S<30 y !<3B. 

Formato: 

RST dir 

dir: una de las direcciones de 8 bits antes mencionadas. 

Dado que restart es el comando de bifurcación más rápido, en la 
porción inferior de la memoria (0-í<40) se localizan importantes 
rutinas o bifurcaciones a estas rutinas, que se utilizan 
frecuentemente. Más adelante estudiaremos la función exacta de 
cada comando restart. 

JUMP RELATIVE 

Las bifurcaciones relativas, realizan el salto en relación a la 
dirección actual. La distancia de salto debe por tanto indicarse. 
El primer byte es el código de operaciones, el segundo indica la 
distancia con signo (en complemento a dos). Este proceso se 
caracteriza como direccionamiento relativo. En este caso, la 
distancia recibe la denominación de offset de desplazamiento. 

Formato: 

JR e o bien JR cond,e 

e: Offset 
cond: Z,NC,C,NZ 
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Las bifurcaciones relativas condicionales sólo son posibles 
mediante los flags C y F. ¿Cómo se calcula el offset? 

Observemos el último programa del capítulo 4.9. En la dirección 
Í!A006 se encuentra el comando JR. La dirección de destino es el 
comando SET 3, (HL) en dirección S<A003. De esta forma, la 
diferencia es entonces ?<A006 hasta ?<A003 = 3. Como se trata de una 
bifurcación hacia atrás (la dirección de destino es menor que la 
dirección de partida), el offset es -3. Para conservar el segundo 
byte del comando deberemos restar 2 del offset. 

¿Porqué es necesaria esta resta? 

El procesador siempre lee en primer lugar el comando completo, en 
este caso el código de operaciones (byte 1) y el offset (byte 2). 
Tras cada lectura, PC se incrementa en 1. Una ves leído el comando 
por completo, el PC se encontrará en la dirección de inicio del 
siguiente comando. Como consecuencia de ello, el indicador de 
programa será mayor en 2 que la dirección del comando de salto. 

El Z80 ejecuta el salto sumando la distancia al PC. Por este 
motivo deberemos tener en cuenta el aumento del PC en 2. En un 
"Salto hacia atrás" será necesario saltar por encima de estos 2 
bytes. La distancia que ha de memorisarse se calcula a partir de: 

-3-2=-5 = JiFB en complemento a 2. 

Este byte se indica en el listado ensamblador en la dirección 
{(A007, a continuación del Opcode en la dirección !<A006. En 
lenguaje ensamblador no se indica esta diferencia de 2. El comando 
es JR $-3 ($ para la dirección actual del comando). El Assembler 
calcula automáticamente la diferencia de salto y realiza la resta 
de 2 y la conversión al complemento a 2. Aunque en el comando 
ensamblador se indica el comando en 16 bits, aquí se trata de un 
salto relativo. Teniendo en cuenta la resta, es posible efectuar 
bifurcaciones relativas a la dirección actual desde +129 hasta 
-126 bytes. 
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Resumamos el método de cálculo del byte de offset: 


El comando de salto se encuentra en la dirección DIR. 

La dirección del salto se encuentra en la dirección 0IRZ 
Offset = DIRZ - DIR 

Byte a almacenar: (Offset - 2) en complemento a 2. 
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Mnemonk 

SymboUc 

Opention 

Fbp 

OpCod. 

No. 

of 

Bytes 

No. 

ofM 

Cyeles 

No. 

ofT 

Sutee 

Commenu 

e 

e 


¡ 

e 

B 

76 543 

210 

JP nn 

PC^-nn 

D 

□ 

□ 

Q 

□ 

□ 

11 OCO 011 


3 

10 











•- n 

— 














•- n 

- 




cc 

Condition 

JP cc, nn 

If condition cc 

• 

• 

e 

• 

• 

• 

n oc 

010 

3 

3 

10 

000 

NZnon cero 


b truc PC «-nn. 







♦- n 





001 

Z tero 


otherwise 












010 

NCnon catiy 


continué 







^ n 

■* 




011 

C cerry 














100 

POparity odd 














101 

PE parity even 














lio 

P sign positive 

JRc 

PC«-PC+e 

• 

• 

• 

e 

e 

e 

00 011 

000 

2 

3 

12 

111 

M sign negative 









- c-2 

-• 






JR C.e 

IfC-O, 

e 

e 

# 

• 

e 

e 

00 111 

000 

2 

2 

7 

If condition not met 


continué 







«- e-2 

- 







IfC- 1. 









2 

3 

12 

If üondition b met 


PC^PC+e 














JR NC, c 

IfC- 1. 

• 

• 

• 


e 

e 

00 no 000 

2 

2 

7 

If condition not met 


continué 







- c-2 








If C-0. 









2 

3 

12 

If condition ík mcl 


PC-PC+e 














JR Z.e 

If Z-0 

• 

• 

• 


• 

e 

00 101 

000 

2 

2 

7 

If condiliun not met 


continué 







- c-2 








IfZ • 1. 









2 

3 

12 

If condition ix mel 


PC«-PC + c 














JR NZ.c 

ir z- 1 , 

• 

• 

e 


e 

e 

00 100 000 

2 

2 

7 

If condition not tm 


continúe 







- e-2 








irz*o. 









2 

3 

12 

If condition met 


PC «- K* ♦ e 














JP(HL) 

Pl'-HL 

• 

• 

• 

e 

• 

e 

II 101 

001 

■ 

1 

4 



JP(IX) 

IX’-IX 

• 

e 

• 

e 

• 

e 

II 011 

101 

2 

2 

8 











11 101 

001 






JP(IY) 

PC-IY 

• 

• 

e 

• 

# 

• 

11 111 

101 

2 

2 

8 











11 101 

001 






DJNZ.c 


e 

# 

# 

c 

e 

• 

00 010 

000 

2 

2 

8 

IfB 

>0 


irB«o. 







- c-2 








continué 















IfB #0, 









2 

3 

13 

IF B # 0 


PC«-PC + e 















NoIm: c npivicnts thc extcnaon in Ihc reUtivi tddrcsttnf mode. 

c ba áfned (wo’i oompkfncnt numbar bi thc ranfc ^*126,129^ 
e>2 ía Ihc op-OQdc provides sn cfrcctive addrcsi of pe 'Vc u PC b 
incrcmcntcd by 2 prior lo Ihc addilion of e. 

Fla| Notatioii: e > flcf not iffectcd, 0 • flag reset. 1 ■ Aag set. X > flag b unknown, 
t-fhc» alTccted eccording lo thc tcsull of thc operetion. 
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Fiat Notatkn: • ■ flai not alTected, C ■ fUg reaet, I • flag set, X • flag U unknown 
I ■ flag is aíTected according to Üie lenilt of ttie ofwntíon. 
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Aplicación: 

En el listado de ensamblador (Capítulo 4.9) existe un salto 
relativo en la dirección ?<A009. El destino de la bi-furcación es 
J<A003. Calcule el o-f-fset-byte y compare su resultado con el 
listado de ensamblador. 

Ahora hemos tratado los comandos de mayor relevancia. Hagamos 
referencia a un programa del capítulo sobre comandos de carga. 

La tarea del programa era rellenar el cuadrado superior izquierdo 
de la pantalla. Esto puede realizarse mejor con un bucle. 

En BASIC obtenemos: 

10 FOR I=?<C000 TO !<FFFF STEP 8<800 
20 POKE I,Í<FF 
30 NEXT 

Para formular nuevamente el programa en lenguaje máquina, cargamos 
la pareja de registros HL con la dirección inicial !(C000. Para 
traducir la instrucción STEP !(800 se carga DE con !<800 realizando 
a continuación una adición de 16 bits. Si después de la adición 
queda activado el carry, hemos llegado al final del programa. 
Confeccione con la ayuda de estas instrucciones el programa 
máquina correspondiente. 

Solución: 


AOOO 

2100C0 

10 

LD 

HL,í(C000 

A003 

110008 

20 

LD 

DE,8<800 

A006 

36FF 

30 

LD 

(HL) ,!<FF 

A008 

19 

40 

ADD 

HL,DE 

A009 

30FB 

50 

JR 

NC,!<A006 

AOOB 

C9 

60 

RET 
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Modifique ahora este programa de manera que no se rellene el 
cuadrado sino que se represente el carácter de forma inversa. 

Solución: 


AOOO 

2100C0 

10 

LD 

HL,!<C000 

A003 

110008 

20 

LD 

DEjSiSOO 

A006 

7E 

30 

LD 

A, (HL) 

A007 

2F 

40 

CPL 


A008 

77 

50 

LD 

(HL),A 

A009 

19 

60 

ADD 

HLjDE 

AOOA 

30FA 

70 

JR 

NC,8<A006 

AOOC 

C9 

80 

RET 



En lugar de la inversión del byte con CPL podemos utilizar 
naturalmente el comando XOR íiFF. Este en cambio es más largo (2 
bytes) y por lo mismo más lento. 


El comando DJNZ facilita una programación de bucle más adecuada. 
El offset se indica como en el comando JR, en el segundo byte. El 
registro B se utiliza como contador. Para realizar 8 repeticiones 
de bucle debe cargarse el registro B con 8, porque si B=0 ya no se 
efectúa la bifurcación. El comando JR es reemplazado por DJNZ y al 
comienzo B se carga con el valor 8. 

Listado ensamblador; 


AOOO 

0608 

10 

LD 

B,8 

A002 

2100C0 

20 

LD 

Hl,Í(COOO 

A005 

110008 

30 

LD 

DE,Í<800 

A008 

7E 

40 

LD 

A,(HL) 

A009 

2F 

50 

CPL 


AOOA 

77 

60 

LD 

(HL),A 

AOOB 

19 

70 

ADD 

HLjDE 

AOOC 

lOFA 

80 

DJNZ 

: ííAOOB 

AOOE 

C9 

90 

RET 
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4.11 COMANDOS DE CONTROL 


Los comandos de control modifican o afectan sobre el rapdo 
operativo o el funcionamiento de la CPU. 

El comando NOP 

NOP significa NO Operation. Así pues, el comando NOP, carece de 
función. Aunque parezca paradójico, tiene su justificación. Por un 
lado, el comando NOP puede utilizarse para un retardo intencional; 
en el ordenador CPC un comando NOP necesita aproximadamente un 
microsegundo (10'"-ó seg.) y por otra parte este comando puede ser 
utilizado como reserva de espacio en determinados programas. De 
este modo resulta más sencilla la búsqueda o rectificación de 
errores. El código de operación de este comando es S<Ü0, es decir 
que si el programa se ejecuta por descuido en un área borrada, no 
corre el riesgo de resultar dañado o modificado, ya que NOP no 
ocasiona modificaciones. 

El comando STOP 

Este comando interrumpe las operaciones de la CPU durante el 
tiempo necesario hasta que se ejecute un Reset o un Interrupt. 

Comandos de control Interrupt. 

Una interrupción sirve principalmente para la ejecución de 
procesos importantes en el ordenador. Una interrupción es el aviso 
que un componente del mismo emite sobre la entrada a un estado 
determinado, p. ej. la espera de los periféricos de entrada/salida 
a la entrada de datos. La CPU se encarga de tratar esos avisos 
según su importancia. Un programa que se ejecute normalmente puede 
ser interrumpido por un Interrupt. Estas interrupciones juegan un 
importante papel en la entrada y salida de datos. Los ordenadores 
CPC ofrecen la posibilidad de programar interrupciones a partir 
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del BASIC (EVERY-AFTER). En estos comandos, el interrupt es 
activado por el reloj interno del procesador. Si se requiere una 
interrupción, el programa bifurca a la dirección inicial de un 
subprograma que ejecuta las acciones correspondientes de la 
respectiva interrupci.ón. De este programa servicio interrupción 
puede bifurcarse nuevamente al programa principal mediante el 
comando RETI (Return Interrupt). 

Se distingue entre interrupciones con máscara e interrupciones sin 
máscara. Las últimas se ejecutan bajo cualquier condición y tienen 
máxima prioridad. El comando RETN permite retornar desde un Non- 
Mascarable-Interrupt (NMI). 

DI Disable Interrupt y El Enable Interrupt 

El comando DI provoca un bloqueo temporal de las interrupciones 
con máscara, desde el momento en que este comando se ejecuta. Las 
interrupciones permanecen bloqueadas hasta que el comando El 
(Enable Interrupt) las vuelve a activar. 

El procesador ZBO posee 3 modalidades de interrupción: IM 0, IM 1, 
IM 2. 

IM 0 (Interrupt Modus 0) 

Con IM 0 puede conmutarse del modo 1 al modo 0. 

Después de una interrupción en esta modalidad, el procesador 
espera un comando de entrada/salida de un periférico. 

IM 1 

Esta modalidad representa el estándar que se presenta al conectar 
el ordenador. 

Al producirse una interrupción en esta modalidad, el procesador 
bifurca automáticamente a una dirección predeterminada. 

IM 2 (Vector-Interrupt) 

Con esta modalidad de interrupción, el procesador bifurca a una 
dirección existente en una tabla de funciones. 
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L_ 


Fla^ 


_J 

Oi^ode 

No. 

of 

Bytes 

No. 

ofM 

Oyeles 

No. 

ofT 

States 


Mnemonic 

Symbolic 

Operation 

i 

1 

i 

1 

i 

B 

76 543 210 

Commenis 

DAA 

Converts acc. 
content into 
packed BCD 
following add 
or subtract 
wilh packed 
BCD operands 

t 

t 

P 

t 

• 

i 

00 100 Mi 

1 i 

1 

1 

4 

Decimal adjust 
accumulator 

CPL 

A-X 

• 

1 

1 

• 

• 

• 

i 

1 

i 

00 101 111 

1 

1 

4 

Complement 
accumulator 
(one's complement) 

NEG 

A- 0 -A 

í 

1 

VI 

t 

1 

1 

11 101 101 

01 000 100 

2 

2 

8. 

Negate acc. (two's 
complement) 

CCF 

CY 

t 


• 

• 

0 

X 

00 111 111 ¡ 

1 

1 

4 

Complement carry 

n*i 

SCF 

CY - 1 

1 

• 

• 

• 

0 

0 

00 lio 111 

1 

1 

4 

Set carry flag 

NOP 

No operation 

• 

• 

• 

• 

• 

• 

00 000 000 

1 

1 

4 


HALT 

CPU halted 

• 

• 

• 

• 

• 

• 

OI lio lio 

1 

1 

4 


DI 

IFF-0 

• 

• 

• 

• 

• 

• 

11 lio 011 

1 

1 

4 


El 

IFF«- l 

• 

• 

• 

• 

• 

• 

II 111 011 

1 

1 

4 


IMO 

Set intemipt 
' mode 0 

• 

• 

• 

• 

• 

• 

11 101 101 

01 000 lio 

2 

2 

6 


IM 1 

Set interrupt 
mode 1 

• 

• 

• 

• 

• 

• 

11 101 101 

01 010 lio 

2 

2 

8 

¡ 


1M3 

Set interrupt 
mode 2 

• 

• 

• 

• 

• 

• 

¡ 

11 101 101 

01 011 lio 

2 

2 

8 

i 


NoIm: IFF indicates the intemipt enable (lip^flop 

CY indicates the carry flip-nop. 


Flag Notation: • ■ flaf not affected, 0 ■ flag reset, 1 ■ flag set, X ■ flag is unknown, 
I ■ flag ís aíTected according to the result of the operation. 
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4.12 COMANDOS DE ENTRADA-SALIDA 


Los comandos I/O forman un grupo de comandos del ZBO al que 
normalmente damos poca importancia. La razón de ello es que el 
resultado y la aplicación de estos comandos depende en gran medida 
del Hardware. Cada ordenador utiliza para la comunicación con 
sus dispositivos periféricos por lo menos un circuito integrado 
preparado especialmente para el tratamiento I/O. Su ordenador 
posee un componente llamado PPI (Programmable Peripheral Interface 
(8255)), que se conoce asimismo como PIO o PIA. 

Una parte de los comandos I/O se refieren a este componente que 
realiza automáticamente la comunicación con el teclado, el 
cassette y el control de memoria. A través de las líneas I/O, se 
encuentran asimismo conectados al procesador el PSG (Programmable 
Sound Generator) responsable de la generación de sonidos que 
controla además el Joystick, y el ORTO (Cathode Ray Tube 
Controller) que genera la imagen del monitor. Como pueden 
observar, todos los componentes seleccionadles a través de 
comandos I/O forman parte importante del ordenador. La conexión 
entre estos componentes autónomos (es decir por ejemplo el CRIC 
genera constantemente e independientemente de la CPU la señal de 
salida de vídeo) y el 280 se realiza a través de dichos comandos 
I/O. Con ayuda de los mismos se transmiten o reciben comandos y 
datos de/a estos componentes. Los componentes I/O se ocupan de la 
comunicación con los periféricos. 

Para estas conexiones se utiliza la denominación "Interfase". Como 
ya hemos explicado, existen interfases internas (procesador- 
componente I/O) e interfases externas (componente I/O- 
dispositivo). 

Un comando I/O envía (o graba) un valor a la interfase. Si hay un 
dispositivo conectado, el mismo recibe el valor y realiza la 
acción correspondiente. Existen un total de 256 direcciones 
I/O diferentes. La dirección (también: dirección del puerto I/O) 
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determina a qué dispositivo deben "transmitirse" los datos. 

De lo explicado anteriormente pueden ver que un comando completo 
necesita in-formaciones: 

- La dirección del puerto I/O. 

- El valor de los datos, que qieren "transmitirse" o bien el 
registro en el cual se deben almacenar los datos recibidos. 

La dirección del puerto siempre -figura entre paréntesis. En el 
caso del comando IN los datos se leen del puerto grabándolos en el 
registro indicado. El comando OUT "transmite" los datos indicados 
al puerto seleccionado. 

Los comandos I/O se utilizan en dos modalidades de 

direccionamiento: 

Direccionamiento inmediato 

Formato: 

OUT (n)IN A,(n) 

Direccioriamiento indirecto 
Formato: 

OUT (C),r IN r,<C) 

El BASIC del CPC ofrece los comandos correspondientes que son 
»INP¡I: y *0UT». El resultado es el mismo que en los comandos de 
lenguaje máquina pero muchas aplicaciones pueden realizarse 
únicamente desde el lenguaje máquina. 

Existen además 4 comandos para entrada de bloques y 4 para salida 
de bloques, que se utilizan de manera similar a los comandos de 
transferencia de bloques en los cuales HL apunta a la dirección de 
memoria, C representa la dirección del puerto y B la longitud del 
bloque. 
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Los comandos I/O comienzan con el código !(ED y poseen un código de 
2 bytes. Solamente los comandos con direccionamiento inmediato IN 
A,(n) y OUT (n),A utilizan un código de 1 byte. 

Al utilizar los comandos I/O en los ordenadores CPC, existen 
algunas restricciones del set de comandos del Z80A estándard. La 
dirección de puerto se indica normalmente en el direccionamiento 
inmediato por ejemplo como valor de un byte. Este byte se envía a 
las líneas de dirección !<A0 a ScA7. 

Por el contrario en el CPC están conectadas las líneas S<AS hasta 
&A1S con los componentes I/O. Esto significa que debe indicarse 
una dirección de puerto de 2 bytes, donde solamente el High byte 
determina la selección del puerto. Esta posibilidad la tenemos 
únicamente operando con direccionamiento indirecto, cargando la 
dirección del puerto en el registro B. 

Aunque el comando es: 

OUT (C),r o bien IN r,(C) 

internamente se posiciona el contenido del registro B en las 
líneas de dirección StA8 hasta SiAlS. La asignación de las 
direcciones de puerto a los componentes correspondientes, es 
relativamente complicada, debido a que en muchos casos únicamente 
determinadas combinaciones de bits pueden seleccionar un 
componente. 

Debido a este método de direccionamiento de puerto, los comandos 
I/O del direccionamiento Inmediato y los comandos I/O de bloque no 
pueden utilizarse en los ordenadores CPC. 
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CAPITULO V ; PROGRAMACION DEL Z80 

5.1 EL ASSEMBLER (ENSAMBLADOR) 


Hemos escrito un lenguaje assembler, para evitarnos en los 
próximos programas máquina el efectuar la traducción manual. 

El ensamblador convierte un programa escrito en lenguaje Assembler 
(programa fuente o Source) en código máquina (produce el programa 
objeto Object-Program). Para ello, calcula por ejemplo de forma 
automática los desplazamientos en las bifurcaciones relativas. 
Reducimos por ello al mínimo el fatigoso trabajo de los programas 
máquina, de traducción manual de los Opcode etc. 

Para el programa ensamblador del Z80, se han establecido las 
siguientes convenciones: 

Una línea de ensamblador se forma de la siguiente manera: 

Label Comando Operando ;Comentario 

Dado que queremos utilizar el editor BASIC para la entrada de los 
programas, cada instrucción assembler se asigna a un número de 
1ínea. 

Definimos a continuación el formato de entrada de ensamblador. 
Para evitar errores al utilizar el ensamblador, es muy importante 
el siguiente apartado. Estúdienlo con profundidad. 


Label: 

Al principio de una linea puede encontrarse un Label 
(denominación). Un Label es una variable. La longitud del nombre 




El libro del Lenguaje Máquina del CPC 


162 


de variable (el nombre del Label no puede exceder los 6 
caracteres). Los nombres de Label han de comenzarse con una letra. 
Los comandos Assembler no deben utilizarse como nombres Label. 
Utilizando los Labels nos simplifica la programación de 
bifurcaciones: 


ANF Comando ANF: Label 


JR ANF : Bifurca hacia ANF 


El ensamblador calcula automáticamente la distancia correcta. 
Comando (Mnemonic): 

Después del eventual mente presente Label, ha de continuar el 
comando. Label y comando han de separarse por un espacio en 
blanco. El mnemónico ha de ser una palabra de comando assembler 
válida. Palabras de comando válidas hemos utilizado constantemente 
en las listas de comandos p. ej.: LO, ADD, INC, etc. 

Operando: 

Después del comando, se continúa con el operando, separado por un 
espacio en blanco. En las bifurcaciones la dirección de 
bifurcación puede indicarse como Label (ver anterior). La 
existencia de este Label es naturalmente importante. 

En lugar de constantes o distancias se pueden utilizar nombres de 
variables o Labels. 

Los operandos no deben contener nunca espacios en blanco. 
Comentario: 

Al final de una línea puede continuar un comentario, separado por 
un espacio en blanco y un punto y coma. Todas las líneas que 
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siguen al punto y coma, no se tienen en cuenta en la traducción. 
Los comentarios son una ayuda útil para la posterior comprensión 
del programa. 

Durante la traducción, el assembler produce un listado de 
assembler que puede visualizarse a través de la impresora o la 
pantalla. El código producido puede además almacenarse en el 
cassette/diskette. 

El listado de assembler tiene el siguiente aspecto: 


S<Dir 

S<Code 

BASIC 

N.Linea 

Label 

Comando 

Operando : Comentario 

A003 

36CC 

50 

SEGUIR 

LD 

(HL),Bitma ; Matriz bit 

A005 

23 

60 


INC 

HL ; incr. HL 


Adicionalmente a los comandos Z-80 el ensamblador reconoce un gran 
número de pseudocomandos. Estos son en realidad instrucciones para 
el ensamblador p.ej. END, que indica al ensamblador la 
finalización de la búsqueda y traducción de comandos. 

Otra instrucción de importancia es EQU (inglés equal: igual). Con 
EQU se define el valor de una variable. 

Nombre variable EQU valor 

La instrucción ORG (organization) indica la dirección a partir dé¬ 
la cual debe almacenarse el programa. En la mayoría de los casos 
utilizamos como dirección inicial &A000. 

En la definición numérica, se han determinado las siguientes 
convenciones. 

Los números hexadecimales se representan posicionando un "Si" 
delante del número. 

Los números binarios se representan con “S<X" delante del número. 

Si un número se indica sin ninguno de estos símbolos se interpreta 
como número decimal. 
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Las convenciones estándard para el ensamblador Z80 son una H al 
•final de un número en he;:adecímal y una B al -final de un número 
binario. 

No obstante utilizaremos las convenciones arriba mencionadas “?<" y 


Prueben el assembler introduciendo un pequeño programa. 

El programa -fuente de ensamblador puede introducirse 
independientemente del Assembler. El primer programa del capítulo 
1.2 se representaría de la siguiente manera: 


10 ’org ¡taOOO 

20 ’bildad equ !<c000 ; inicio memoria pantalla 
30 ’bitmat equ íiCC ; matriz puntos de pantalla 
40 ’ld hljbildad 
50 'seguir Id (hl),bitmat 
60 ’inc hl 

70 'cp h ; comparación con cero 
80 'Jr nz,seguir 
90 ’ret , 

100 ’end 


Al introducir un programa pueden utilizarse letras minúsculas o 
mayúsculas indistintamente. 

Tengan en cuenta que después de cada número de línea con una 
separación de 1 espacio en blanco, debe introducirse Shi-ft 7 (’). 
Si omite este carácter la línea correspondiente no puede 
traducirla el ensamblador y visualiza el mensaje de error: 

“error ’ missing in." 


La linea 10 determina el área de almacenamiento de programa a 
partir de !<A000 en sentido ascendente. 
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La línea 20 asigna el valor ?<C000 a la variable Bildad (V). 

A continuación puede utilizarse siempre "Bildad" (V) en lugar de 
!<C000. Utilizando adecuadamente las variables, el programa 
resultará más depurado y más claro. En el bucle de programa hemos 
utilizado el label "seguir" como destino de bifurcación. Por lo 
demás utilizamos los comandos assembler normales. 


Si en una línea se utiliza un comentario, debe separarse del resto 
del comando por un punto y coma. Es importante que delante del 
punto y coma haya un espacio en blanco. Los espacios en blanco 
significan para el ensamblador que finaliza un label y a 
continuación sigue el comando. Por ello entre label, comando, 
operando y comentario siempre (II) debe utilizar un espacio en 
blanco y por ejemplo dentro de un operando nunca (II) deben mediar 
espacios en blanco. 

Ejemplo; 

( HL ) ERRONEO III 

(HL) CORRECTOMI 

Al final del programa debe codificarse el pseudocomando END, que 
indica al ensamblador que puede finalizar la traducción. 

Grabe el programa introducido con ÍSAVE "nombre"» y cargue el 
ensamblador mediante IMERGE». El assembler ocupa el número de 
líneas a partir de 10.000 y la línea 1. Dichos números de línea 
no deben por ello utilizarse en el programa fuente. 

OBSERVACION para usuarios de diskette: 

Un programa que quiere cargarse mediante IMERGE» desde el diskette 
ha de ser un fichero ASCII sin cabeceras. Esto se logra mediante 
una "A" separada por una coma después del comando »SAVE». Dado que 
la carga de este tipo de fichero necesita más tiempo se debe 
cargar siempre en primer lugar el assembler (como programa normal 
BASIC) y a continuación el programa fuente (fichero ASCII sin 
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cabeceras). Dado que el AMSDOS ocupa aproximadamente 500 bytes de 
memoria RAM que se asignan dinámicamente, los usuarios de disLette 
deben almacenar los programas máquina en el ámbito de direcciones 
hasta el máximo de &A600, para evitar complicaciones. 

En el CPC 664 y 6128 se puede realizar la programación normal 
BASIC con *MERGE*. La grabación lenta como -fichero ASCII no es 
necesaria. 

Ahora arrancamos el programa con *RUN*. 

El assembler pregunta por el nombre del programa, si se desea un 
listado de ensamblador de la traducción y si se quiere imprimir el 
mismo. Las respuestas predefinidas (S para listado y N para 
impresora) pueden introducirse mediante ¡HENTER». Utilice en primer 
lugar los valores estándard. 

Ahora comienza la verdadera traducción. 

El listado de ensamblador conocido, se visualiza en la pantalla. 
Al producirse un error se visualizan los pertinentes mensajes con 
la línea correspondiente. Al final del listado se indican, si 
están presentes, las etiquetas indefinidas y las variables. A 
continuación viene el nombre de programa, la dirección inicial, la 
dirección final, longitud del programa y cantidad de errores. Si 
se han producido errores, los mismos pueden corregirse en la 
correspondiente línea BASIC. 

Al final del listado se visualiza una tabla de todos los labels y 
variables con sus valores en el orden de su aparición. Finalmente 
se pregunta si se quiere grabar (almacenar) el código máquina 
producido. 

Al introducir “S“ el código producido se almacena como fichero 
binario bajo el nombre indicado con la extensión ".OBJ" (OBJi 
Object Code"). Después del ensamblaje, el programa máquina se 
encuentra en la posición indicada en la memoria y puede llamarse 
mediante tCALLt. 
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Si desea traducir otros programas en lenguaje maquina, puede 
borrar el programa fuente anterior mediante *DELETE 2-9999*. El 
nuevo programa puede cargarse mediante *MERGE*. Como ejemplo les 
indicamos el listado ensamblador completo de nuestro procedimiento 
de programa. 


AOOO 


10 


ORG 

8<a000 



AOOO 


20 

BILDAD 

EQU 

5<c000 ; Inicio memoria 

pantalla 

AOOO 


30 

BITMAT 

EQU 

?!CC ; Matriz puntos 

de 

pantalla 

AOOO 

2100C0 

40 


LD 

hl ,bildad 



A003 

36CC 

50 

SEGUIR 

LD 

(hl),bitmat 



A005 

23 

60 


INC 

hl 



A006 

BC 

70 


CP 

h ; comparación con 

cero 

A007 

20FA 

80 


JR 

nz,seguir 



A009 

C9 

90 


RET 





Programa 

Bild 


Inicio 

8<A000 

Fin ; S(A009 

Longitud 

OOOA 



0 errores 


Tabla de variables: 


BILDAD COOO BITMAT OOCC SEGUIR A003 

Intente comprender al introducir el listado, la estructura básica 
del ensamblador mediante las explicaciones que siguen al listado. 

ADVERTENCIA: Nunca modifique la línea 1. Tenga en cuenta que no 
sobre ningún espacio en blanco o carácter similar, tampoco al 
final de la linea. Además no debe modificarse ni introducirse nada 
hasta la linea 10010 incluida, ni en el comienzo de la porción de 
inicialiíación, lineas 14160-14100. El valor inicial de bpc (V) y 
de vapt (V) pueden contener entonces valores erróneos, por lo cual 
el programa no funcionaría más. 
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1 MEMORY ?í9EFF:GOTO 10000 

10000 REM ********** Z80 Assembler c 1984 by Holger Dullirt * 
********* 

10010 GOTO 14160 

10020 LOCATE 20,4:PRINT"Z 80-Asse(nbl er" 

10030 LOCATE 5,8; INPUT "Nombre Programa :",nDmbre$ 

10040 LOCATE 19,1 IrPRINT "S" 

10050 LOCATE 5, 11 : INPUT"Ll3tadO (s/n):",tT 

10060 IF t*="n" THEN 1 istf1ag=0:GOTO 10100 EL5E listflag=-l 
10070 LOCATE 19,13;PRINT"n"; 

10080 LOCATE 5,13: INPUT >■ Impresora (s/n): ",t» 

10090 IF t*=‘s'‘ THEN aus=8:PRINT#aus ELSE aus=0 

10100 REM.'iniciq del ENSAMBLAJE"»* 

10110 MODE 2 

10120 REM COIPRQBACION INICIO DE LINEA 
10130 1aze=FNdeek<bpc) 

10140 bpc=bpc+2 
10150 zenr=FNdeek(bpc) 

10160 IF zenr>9999 THEN PRINTHaus," Fi n aSLtmi do " : GOTO 17400 
10170 bpc=bpc+2 

10180 IF FNdeek(bpc) ■.>49153 THEN PRINT#aus, "Error ’ miSEÍng 
jp • ; zenr : bpc=bpc+l aze-4:-f eza=Teza+l: GOTO 10130 
10190 bpc=bpc+2 

10200 REM lectura linea - 

10210 POKE vapt,laze-7 

10220 POKE vapt. +1 ,bpc—256* INT (bpc/256) 

10230 POKE vapt+2,INT(bpc/256) 

10240 REM Descomponer linea - 

10250 zeiaí=zeií: 

10260 bpc=bpc+laze-6 

10270 FOR i=0 TO 3:aí:(i )="":NEXT 

10230 bepo=INBTR<zeií:,"; ") 

10290 IF bepo=0 THEN bemerí="":GOTO 10320 
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1 0300 bemer 4^=RIGHTJ' íz&ií,LEN< 2 eií) —bepo-*' 1) 

10310 2 ei í=LEFTÍ-(z 01 $, bepo-~ 1) 

10320 j=0 

10330 IF LEFTÍ (zei í, 1) =" " THEN nei Í:=RIGHTÍ (zei í,LEN (zei í)-1 
):GÜT0 10330 

10340 Bppo=INSTR(zei#, ■' ") 

10350 IF zeií="" THEN j=j-l:GOTO 10420 
10360 IF sppo=0 THEN 10410 

10370 a*( j)=LEFTÍ(zeií,5ppo-l):zeiÍ=RIGHTÍ(zeií,LEN(zeií)-sp 
po) 

10380 IF 201*="" THEN j = j-l:GOTO 10420 

10390 IF j>3 THEN 10420 

10400 j=j+l;G0T0 10330 

10410 aí<j)=z 0 ií 

10420 IF j>2 THEN 13250 

10430 REM -'■'terpretácion- 

10440 j=0 

10450 be'fí=LEFTÍ(UPPERÍ <ai( j) )+'■ ",4> 

10460 po=IN3TR<teadrí,bePÍ) 

10470 IF po<>0 THEN lp=0:6ÜTO 11190 
10480 po=INSTR(tebl*,beíí) 

10490 IF po<>0 THEN lp=l;G0T0 10810 
10500 po=INSTR(teedí,bePí) 

10510 IF po<>0 THEN lp=2:pw(l)=8<ED;GOTO 10850 
10520 REM c 2 (Tiprobación pseudocomando 
10530 po=INSTR(tepst,befí) 

10540 IF po<>0 THEN 10890 

10550 REM aí<j)=label ? - 

10560 IF j>0 THEN 13250 
10570 IF aí(0)="" THEN 13100 
10580 a«=a«<0) 

10590 GOSUB 13630 

10600 IF nolaíl THEN 13280 
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10610 labBl*=UPPER*(labí) 

10620 wert=mpc 

10630 1 ata$ < 1 tp) =1 abel ^iwltadtp) =(npc: 1 tp=l tp+1 

10640 POR i=0 TO ultprlF 1 abel í:=ul ata* (i ) THEN 10670 

10650 NEXT i 

10660 j=j+l:GDTO 10450 

10670 ON udata<i,2) GOTO 10680,10700 

10680 adr=ijidata (i , 1)-1: z 1 el =wert: GOSUB 14100 

10690 pw(l>=ot;GOTO 10720 

10700 pw(2)=INT(wert/256) 

10710 pw(1)=wert-pw(2)*256 

10720 PRINT#austlt»* Línea "uidata (i ,0) ; " : " ; ul ata* (i ) ; "=?< 
;HEX*(wert,4) 

10730 POR k=l TO udata(i,2) 

10740 POKE udatad ,l)+k-l,pw(l:) 

10750 NEXT k 

10760 POR k=i TO ultp-1 

10770 ulata*(k)=ulata*(k+l) 

10780 POR c=0 TO 2:udata(k,c)=udata(k+l,c)iNEXT crNEXT k 
10790 ultp=ultp-l:i=i-l 
10800 GOTO 10650 

10810 REM comí /I Byte sin üperanflc 
10820 IP a* (j + l )<>"■■ THEN 13270 
10830 pw(l)=wbl(<po-l)/4) 

10040 GOTO 13100 

10850 REM ed / 2bytes sin operando comenzando con ed 
10860 IF a* < j + l )<>■"■ THEN 13270 
10870 pw(2)=wed((po-1)/4) 

10880 GOTO 13100 

10890 REM pseudocomandos - 

10900 j=j+l 

10910 ope*=a*(j):op*=UPPER* <ope*> 

10920 ON (po-l)/4 GOTO 10980,11040,11060,11080,11100,11160 
10930 REM EQU 

10940 IF label*="" THEN 13280 
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10950 a#=opí;GOSUB 13790 
109Í10 wlta(ltp-l)=wert 
10970 GOTO 13100 
10980 REM ORG 

10990 IF op»="" THEN 13290 
11000 a*=opí:GOSUB 13790 
11010 lp=0 

11020 mpc=wert:mpstart=mpc 
11030 GOTO 13100 
11040 REM END 
11050 GOTO 13400 
11060 REM DB 

11070 a:t=op*!GOSUB 14050: GOTO 13100 
11080 REM DW 

11090 a*=op*:GOSUB 13860:GOTO 13100 
11100 REM DM 

11110 IF LEFT*(opí,l)<>CHRÍ(34) OR RIGHTÍ(opí,1)OCHRÍ(34) T 
HEN 13260 

11120 zwi*=MID*(DpeÍ,2,LEN(opeí)-2) 

11130 lp=LEN(zwií) 

11140 FOR i = l TO lp:pw(i)=fiSC(MIDí<zwií,i,1)> :NEXT 
11150 GOTO 13100 
11160 REM DS 

11170 aí=opí:GOBUB 13860 
11180 ds=wert:1p=0:GOTO 13100 

11190 REM con valoración- 

11200 j=j+1:Dpeí=aí<j) 

11210 opí=UPPERÍ(opeí) 

11220 IF Dpí="'' AND befí<>"RET " THEN 13290 
11230 G05UB 11240:GOTO 11340 
11240 poko=INSTR(Dpí,",") 

11250 IF pokQ=0 THEN olí=opí:kofIag=0:GOTO 11280 
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li2é>\S koflag=—1 

11270 olá=LEFTÍ <Dp$,poko—1):o2í=RIGHTí(op$,LEN(op:$)—poko> 
11280 pokla=INSTR<opí:," (") : pokl z = INSTR <opí, " ) ") 

11290 IF pokla=0 THEN kl ai 1ag=0: kl in*="":GOTO 11330 
11300 IF pQkla>pDkl 2 THEN GOTO 13260 
11310 kla-flag=-l 

11320 kl i n4:=MID'í (opi:,pokl a+1, pok 1 z—pokl a-1 > 

11330 RETURN 
11340 REM 

11350 ipo=INSTR<Dp:í,"IX"> 

11360 IF ipo<>0 THEN pwi =8<DD: i regí='‘IX " : GOTO 11450 
11370 ipo=INSTR(opí,"IY”) 

11380 IF ipo<>0 THEN pwi =S<FD; ireg*=" lY" : GOTO 11450 
11390 zwi=(po+3)/4 

11400 ON zwi GOTO 12630,11920,11900,12040,12040,12080,12220, 
12240,12340,12320,12380,12430,12430,12520,12560 
11410 REM IdO bifurcación relativa (2), bifurcación (3), 
,(2), pila (2,', rst, i/o, im 

11420 IF zwi<24 THEN 11590 
11430 IF zwi<32 THEN 11760 
11440 GOTO 11830 

11450 REM |-Qmandos indexados- 

11460 iílag=-l 

11470 IF (NOT klailag) OR (ipo-poklaOl) THEN opí=LEFT* (op#, 
i po-1) + " HL •' +RIGHT* < op», LEN (op*) -i po-1 > : GOTO 11550 
11480 zwi*=MID*(klin*,3,l):IF zwi»<>"+" AND zwiíO"-" THEN I 
F bei*="JP " THEN 11540 ELSE GOTO 13250 
11490 a*=RIGHT»<kIin*,LEN(klin*)-3) 

11500 GOSUB 14050:lp=lp-l 
11510 IF THEN GOTO 13260 

11520 disflag=-l 

11530 disw=wert;IF zwi»="-" THEN disw=(disw XOR 255) +1 
11540 op*=LEFT*(op*,pok1 a)+"HL"+RIGHT*(op*,LEN(op»)-poklz +1) 


numer* 
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11550 IF (INBTR(op*,"IX")=0)fiND(INSTR(Dpi:,"IY")=0)THEN 11570 
11560 IF (op*=("HL,"+ireg*))AND(bef#="ADD "> THEN op*="HL,HL 
" ELSE GOTO 13260 
11570 GOSUB 11240 
11580 GOTO 11390 

11590 REM aritmetico-logicos- 

11600 IF NOT ko-flag THEN aí-=olí:: GOTO 11620 
11610 IF olí:<>"A" THEN 11670 ELSE a*=o2í 
11620 Ip=l;code=zwi-16 
11630 GOSUB 13680 

11640 IF r-flag THEN pw<l)=128 OR(code*B) OR rrrzGOTO 13100 
11650 pw(l)=?<Xl 1000110 OR (code*B) 

11660 GOSUB 14050:GOTO 13100 
11670 IF olí<>"HL" THEN 13260 
11680 al;=o2# 

11690 GOSUB 13730 

11700 IF NOT r-flag THEN 13260 

11710 IF befí="ADD " THEN code=S<X 1001: 1 p=l; GOTO 11750 
11720 pw(l)=8<ED:lp=2 

11730 IF bB-fí="ADC " THEN codB=S<X 1001010 : GOTO 11750 
11740 IF be-f^="SBC " THEN codB=?<X 1000010 ELSE GOTO 13250 
11750 pw(lp)=codB OR <dd*16):G0T0 13100 

11760 REM rotacion-desplaramiento- 

11770 lp=2:pw(l)=8<CB 
11780 IF koflag THEN 13260 
11790 aí:=opÍ: GOSUB 13680 
11800 IF NOT r-flag THEN 13260 
11810 pw(2)=(8*(zwi-24)) OR rrr 
11820 GOTO 13100 

11830 REM bitti - 

11840 lp-2:pw(n=&CB 
11850 a$=o2$:GOSUB 13680 
11860 IF NOT rflag THEN 13260 
11870 bbb=ASC(ol«)-48 

11880 IF (0>bbb) OR (7<bbb) OR (LEN(olT)<>l) THEN 13260 
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11890 pw<2)=<64*(zwi-31))0R(bbb*8)0R rrrsBOTO 13100 

11900 REM bifurcaciones relativas - 

11910 lp=l;pw(l)=«<10:a»=op*:GOTa 11990 
11920 lp=l 

11930 IF NOT koflag THEN ccc=ÍíX1 1: a*=op*: GOTO 11980 
11940 a»=ol*;GOSUB 13760 

11950 IF (NOT c-flag) OR (ccc>3) THEN 13260 
11960 ccc=ccc OR 4 
11970 a4:=D2* 

11980 pw(l)=ccc*8 

11990 IF LEFTÍ(a*,1)<>"♦" THEN GÜSUB 13860;1p=lp-2:IF i>Itp 
THEN wert=mpc :GOTO 12010;ELSE 12010 
12000 WBrt=mpc+VAL(RIGHT*(aí,LEN(a*)-1)) 

12010 lp=lp+l;adr=mpc;ziel=wert 

12020 GOSUB 14100 

12030 pM(2)=of ¡GOTO 13100 

12040 REM Spruenge - 

12050 ZMÍ=l:lp=l 

12060 IF bef!t="RET " THEN code=0 ELBE code=í<X100 
12070 GOTO 12110 

12080 IF op*="(HL)" THEN lp=l; pw(1)=&E9;BOTO 13100 
12090 code=&X10 
12100 zwi=0;lp=l 

12110 IF be-f*="RET " THEN IF Dp*="" THEN 12130 ELSE 12160 EL 
SE 

12120 IF koílag THEN 12160 

12130 pm<1>=192 OR code OR 1 OR (zwi«8) 

12140 a«=op« 

12150 GOTO 12200 
12160 a«=ol«:GOSUB 13760 
12170 IF NOT cflag THEN 13260 
12180 pm(1>=192 OR code 0R<ccc*8) 
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12190 aí=D2í: 

12200 IF bef#="RET " THEN 13100 
12210 BÜ5UB 13860:GOTO 13100 

12220 REM comandos contador- 

12230 2wí= 0:GOTO 12250 
12240 2wi=l 

12250 IF koflag THEN 13260 
12260 lp=l:aí:=op*:GOSUB 13680 

12270 IF rflag THEN pw(l)=8<X100 OR (rrr*0) OR zwi:GOTO 13100 

12280 GOBUB 13730 

12290 IF NOT rflag THEN 13260 

12300 pw(l)=S<Xll OR (dc)«16) OR (zwi«8) 

12310 GOTO 13100 

12320 REM comandos de pila - 

12330 cade=ScXl 1000001-.GOTO 12350 
12340 code=!!<X 11000101 

12350 a*=op»:dreg*(3)="AF";G0BUB 13730;dreg*(3)=”BP" 

12360 IF NOT r-flag THEN 13260 

12370 lp=l:pw<l)=code OR (dd*16);G0TQ 13100 

12380 REM restart-- 

12390 a$=op«:GOBUB 14050 
12400 zwi=Mertl/8 

12410 IF zwiOINTlzwi) OR zwi >7 THEN 13260 
12420 lp=l;pw(l)=«<X11000111 OR (zwi*8);G0T0 13100 

12430 REM comandos I/O - 

12440 IF NOTlko-flag AND klaflag) THEN 13260 

12450 IF befí:="IN " THEN zwi=0 ELBE zwi = 1: zwií=o2í: □2 Í=d 1Í r 
d1**zwí* 

12460 IF kIin*<>"C“ THEN 12500 
12470 a«>ol«tGOSUB 13680 

12480 IF (NOT rflag) OR (klin*<>"C") THEN 13260 

12490 lp=2;pw(l)*8<ED:pw(2)=64 OR (rrr*8) OR zwi:GOTO 13100 

12500 lp=l:a$=:kIin$:GOSUB 14050 

12510 pw(l)=«<X11011011 XOR (zwi*8):GOTO 13100 
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12520 REM modificación interrupciones 

12530 IF op*<>"0" AND op^O"!" AND op*<>"2" THEN 13260 
12540 lp=2:pw(l)=í<ED 

12550 pm(2)=ScX1000110 OR (< VAL(op*)-(op»<>"0" ))*B)! GGTO 131C 
0 

12560 REM EX - 

12570 lp=l 

12580 IF opí="(SP),HL" THEN pw(1)=&E3:GOTO 13100 
12590 IF ap»="DE,HL” THEN pw (1) =«<£65GOTO 12620 
12600 IF op*="AF,AF'" THEN pw (1) =í<8! GOTO 13100 
12610 GOTO 13260 

12620 IF iílag THEN 13260 ELSE 13100 

12630 REM Id- 

12640 IF NOT koTlag THEN 13260 
12650 a$=ol«:GOSUB 13680 
12660 IF rTlag THEN 12860 
12670 GOSUB 13730 
12680 IF r-flag THEN 12760 
12690 a»=o2*:GOSUB 13730 
12700 IF rflag THEN 12740 
12710 zwi*=o2í!o2*=ol*iol*=zwi^ 

12720 a=0:GOSUB 12940 

12730 IF n-flag THEN 13260 ELSE GOTO 13100 
12740 IF NOT kla-flag THEN 13260 
12750 zwi*=o2*!Zwif lag=l;GOTO 12800 

12760 IF opí="SP,HL" THEN lp=l: pw (1 > =8<F9: GOTO 13100 
12770 IF klaflag THEN zwi*=olí:zwif1ag=0;GOTO 12800 
12780 a*=o2# 

12790 lp=l:cDdB=l;GOTO 12830 
12800 a$=klin$ 

12810 IF zwi*="HL" THEN I p=l: code=«<A: GOTO 12830 
12820 1 p=2: pw < 1) =&ED: code=S<X 1001011 
12830 code=code AND NOT (zwiflag*8) 

12840 pw(lp)=code OR (dd*16) 
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12850 GOSUB 13860!GOTO 13100 

12860 zzz=rrr: aí=o2$:: GOSUB 13680 

12870 IF NOT r-flag THEN 12900 

12880 lp=l!pw(l)=64 OR (zzz*8) OR rrr 

12890 IF pw(l)=«<76 THEN 13260 ELSE 13100 

12900 a=l!GOSUB 12940 

12910 IF NOT n-flag THEN 13100 

12920 Ip=l!pw(l)=«íX110 OR (rrr*8) 

12930 a*=o2í : GOSUB 14050:GOTO 13100 

12940 REMcarga especial 3-bit- 

12950 nTlag=0 

12960 IF ol*<>'’A" THEN nT 1 ag=-l: RETURN 

12970 IF klaflag THEN 13030 

12980 IF o2»="I"THEN zwi=0!GOTO 13010 

12990 IF a2í:="R" THEN zwi = l!GOTO 13010 

13000 n-flag=-l!RETURN 

13010 cade =«<X1000111: lp=2! pw (1) =«<ED 

13020 pp=(a«2) OR z mí:GOTO 13080 

13030 IF klin*="BC" THEN zwi=0!GOTO 13070 

13040 IF klin*="DE" THEN zwi=l!GOTO 13070 

13050 lp=l:pw(l)=&X110010 OR (a*8> 

13060 a«=klin^:GOSUB 13860:RETURN 
13070 codG=8<X10:1 p=l! pp= (zwi *2) OR a 
13080 pw<lp>=code OR (8«pp):RETURN 
13090 REM 

13100 REM salida ********** 

13110 IF iTIag THEN 13310 

13120 IF feíO"" THEN Teza=feza+1 

13130 IF NOT listflag THEN LOCATE 5,3:PRINT zenriGOTO 13200 
13140 IF -feíO"" THEN PRINT CHR* (7) ; : PRINT#aus, f e*, TAB (30) ; z 
enr;zeia$:GOTO 13210 
13150 PRINT#aus,HEX»(nipc,4) ; " ■*; 

13160 FOR i=l TO lp:PRINT#aus,HEX*<pw(i),2);:POKE mpc+i-l,pw 
(DiNEXT i 
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13170 PRINT#aus,TAB<14>;UBING"####" 5 zenr; 

13180 PRINT#aus,TAB<20)5label»;TAB(27);bef*;TAB(32)jope»; " " 
;bemer»; 

13190 PRlNT#au 5 
13200 mpc=mpc+lp+ds 
13210 lp=0:ds=0 

13220 1 abel »=" “ s bef »=" ": ope»=" " s bemer»=" " : f e»=‘‘ " 

13230 GOTO 10130 

13240 REM Mensajes Error - 

13250 fe»="Syntax Error":GOTO 13100 

13260 íe»='''Svnta;< Error en Operando “ goto 13100 

13270 f e»=í"Demasi ados üperandos" i GÜTD13100 

13280 •fe»='"Falta Label" GOTO 13100 

13290 •fe»="Falta 0Deráñdo"GOTO 13100 

13300 •fe»= "Cantidad ilegal" iGOTO 13100 

13310 REM Inoexado’ - 

13320 FOR j=lp TO 1 STEP -1 
13330 pw(j+l)=pw(j):NEXT 
13340 pw(1)=pwi:lp=lp+l 
13350 IF NOT disFlag THEN 13380 
13360 IF lp=3 THEN pw(4)=pw(3) 

13370 pw(3)=di sm:I p=lp+l 
13380 if 1 ag=0:disF1ag=0 
13390 GOTO 13120 

13400 REM Fin Programa ********** 

13410 PRINT#aus 

13420 IF ultp=0 THEN 13470 

13430 FOR i=0 TO ultp-1 

13440 PRINT#aus, '“Label indefinido ";ulata*<i ) ;"En '"judata 
(i ,0); "/dirección Sí";HEX» (udata (i , 1 ) ,4) 

13450 Feza=íeza+1:NEXT i 
13460 PRlNT#aus 

13470 PRINT#aus,“Programa «"iname» 

13480 PRINT#aus, “Inicio : HEX»(mpstart,4) ;" Final i ?<";H 

EX»(mpc-1,4) 

13490 PRlNT#aus, "l-ongitud: " ; HEXí (mpc-mpstart, 4) 

13500 PRINT#aus,Feza; ''Frror “' 

13510 IF ltp=0 THEN 13560 

13520 PRlNT#aus,'"Tabla de variables :“ 






Programación del Z80 


179 


13530 FOR i=0 TG ltp-1 

13540 PRINT#au5,LEFT»(lataí(i)+" ",7);HEXÍ(wlta(i),4) 

1 

13550 NEXT i 
13560 PRINT#aus 

13570 input "Gratacion (S/N) ;”,tí 
13580 IF tío “S" THEN 13600 

13590 SAVE nameí+".obj",B,mpstart,mpc-mpstart 
13600 END 

13610 REM iSübrtitinas ********** 

13620 REM label test - 

13630 1aas=ASC(UPPERÍ <LEFTÍ(aí,1))) 

13640 IF laas<65 OR laas>90 THEN nolat1=-l:RETURN 

13650 IF LEN(aí)>6 THEN PRINT "Label 1 argo":a*=l-EFTí(aí,6) 

13660 labí=aí; nol a-f 1 =0 

13670 RETURN 

13680 REM r test - 

13690 FOR i=0 TO 7 

13700 IF regí<i)=aí THEN rFIag=-1;rrr=i:RETURN 
13710 NEXT 

13720 r-flag=0; RETURN 

13730 REM rps test - 

13740 FOR i=0 TO 3; IF dregt(i)=aí THEN rí 1 ag=-1: c)d=i : RETURN 
ELSE NEXT 

13750 rFlag=0:RETURN 

13760 REM cond test - 

13770 FOR i=0 TO 7; IF aí=condí(i) THEN cFI ag=-l: ccc=i:RETURN 
ELSE NEXT 

13780 cFlag=0:RETURN 

13790 REM Test numero - 

13800 wert=VAL(aí) 

13810 laas=ASC(LEFTÍ(ai,1)) 

13820 IF wert=0 AND laas<>38 AND (Iaas>57 OR laas<48) THEN F 
eí= "CARACTER ILEGAL"' '!wert=0:RETURN 
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13830 IF wert>=0 THEN 13850 

13840 IF LEFT*(a*,l)="8<" THEN wert=wert+2''16 ELBE +eí="illeg 
al Quanti ty'*: wert=0 
13850 RETURN 

13860 REM Valoración- 

13870 BOBUB 13620 

13880 IF nola-fl THEN BOBUB 13790: BOTO 13920 
13890 FDR i=0 TO Itp: IF 1 ata* (i ) OI ab:t THEN NEXT 
13900 IF i>ltp THEN 13980 
13910 wert=wlta(i) 

13920 werth=INT(wert/256) 

13930 wertl=wert-256*wBrth 

13940 lp=lp+2 

13950 pw(Ip—1)=wertl 

13960 pw(lp>=Merth 

13970 RETURN 

13980 ulata*<ultp)=a* 

13990 udata(ultp,0)=zenr 

1 4000 udata (ul tp , 1) =mpc+l p-i -f 1 ag-di s-f 1 ag 

14010 udata(uItp,2)=2+<bef*="DJNZ" OR bef*="JR ") 

l-r020 ultp=ultp + l 

14030 wert=0 

14040 BOTO 13920 

14050 REM Valoración LOW- 

14060 BOBUB 13860 
14070 lp=lp-l 

14080 IF werth<>0 THEN íe*=''CANTIDAD ILEGAL'" = wert=0 
14090 RETURN 

14100 REM Calcular Offset - 

14110 of =ziel-adr 
14120 QÍ=of-2 

14130 IF of>129 OR of'-126 THEN te*="illegal Quantity”: dT= 0 
14140 IF oí<0 THEN oí=256+of 
14150 RETURN 
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14160 REM Inicialiracior ********* 

14170 zei*="test" 

14180 vapt=@zei$ 

14190 DEF FNdBek(x)=PEEK(x)+256*PEEK(x+l) 

14200 MODE 2 

14210 teadr»=“LD JR DJNZCALLRET JP INC DEC PUBHPDP R5T IN 
OUT IM EX ADD ADC SUB SBC AND XGR QR CP RLC RRC RL RR 
SLA SRA *** SRL BIT RES SET " 

14220 teed*="CPD CPDRCPI CPIRIND INDRINI INIRLDD LDDRLDI LDI 
RNEG OTDROTIRQUTDOUTIRETIRETNRLD RRD " 

14230 DATA A9,B9,Al,B1,AA,BA,A2,B2,A8,B8,A0,B0,44,BB,B3,AB,A 
3,4D,45,6F,67 

14240 teblí="CCF CPL DAA DI El EXX HALTNOP RLA RLCARRA RRC 
ABCF " 

14250 DATA 3F,2F,27,F3,FB,D9,76,00,17,07,IF,0F,37 
14260 teps*="EQU QRG END DB DW DM DS " 

14270 DIM lata*<70),wlta(70),ulata»(50),udata(50,2) 

14280 DIM wbl(12),Med(20) 

14290 FOR i=0 TO 20:READ a*; wed (i ) =VAL (■•!<"+aí) : NEXT 
14300 FOR i=0 TO 12iREAD aí:wb1(i)=VAL<"&"+a*)sNEXT 
14310 bpc=FNdeek (Sel70> +S<170: mpc=40960: inpstart=mpc 
14320 DIM regí(7),cond*(7),dreg*(3) 

14330 FOR i=0 TO 7:READ regííDsNEXT 
14340 FOR i=0 TO 7;READ condí(i);NEXT 
14350 FOR i=0 TO 3:READ dregí(i>:NEXT 
14360 DATA B,C,D,E,H,L, (HL) ,A 
14370 DATA NZ,Z,NC,C,PO,PE,P,M 
14380 DATA BC,DE,HL,SP 
14390 GOTO 10020 
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Descripción del programa 


Linea 1: 

Se reserva espacio de memoria RAM de ?<A000 hasta Í(AB7F para 
el programa máquina y a continuación se salta el programa 
■fuente entre línea 2 y 9999. 

Linea 10010: 

Bifurcación a la porción de programa de inicialización, es 
decir confección de la tabla de comandos, etc. '.vean línea 
14160). 

Línea 10020-10090: 

Menú, se determinan Listflag (V) y canal de salida aus (V). 
Línea 10100-10190: 

BPC indica la dirección actual en el programa fuente BASIC 
(BPC: Basic Program Counter). Al comienzo de una linea se 
encuentra la longitud de la misma como Low y High bytes. 
FNdeek (BPC) lee el valor de 16 bits en dirección- BPC y 
BPC-t-1. El valor corresponde a la longitud de línea laze (V). 
BPC se incrementa en 2 y el numero de línea zenr (V) se lee. 
Si es mayor que 9999 se finaliza la traducción. En linea 
10180 se comprueba si el carácter (’) se encuentra al 
comienzo de la línea, de lo contrario se visualiza un 
mensaje de error y se lee la línea siguiente. 

Línea 10200-10240: 

Mediante esta porción del programa se llena zei$(V) con la 
línea actual. Para mantener una alta velocidad del 
ensamblador, esto se realiza modificando el apuntador de 
string de zeií(V) en la tabla de variables internas. 

Línea 10240-10420: 

Se almacena en primer lugar un eventual comentario en 
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bemerííV), a continuación se corta la linea restante con 
cada espacio en blanco y las porciones cortadas se almacenan 
en (j) (V). Si la linea puede dividirse en más de 3 
partes (label, comando, operando), es decir .i)2, se 
visualiza un Synta>; Error. 


Linea 10430-10540; 

Aquí se comprueba si en A$ (j) <v) se trata de un comando 
válido. En caso afirmativo se bifurca a la posición en la 
que se traducen estos comandos. 

Linea 10540-10550: 

Si no se ha confirmado un comando, se comprueba por un 
pseudocomando bifurcando a continuación. 

Linea 10560-10800: 

Si se trata de un label, éste se introduce en una tabla de 
1 abéis y el MPC (Machín Program Counter) se asigna como 
valor al label (línea 10610-10630). En las lineas siguientes 
hasta 10800 se comprueba si este label ha sido ya utilizado 
con anterioridad, sin haberse definido. En caso afirmativo 
se pokea el valor correspondiente y el label se borra de la 
tabla de los indefinidos ulataí (i) (v). Si no se trata de 
un label válido (es decir si no comienza con una letra), se 
visualiza el mensaje de error “Falta label" (línea 10600). 

Línea 10810-10840: 

Aquí se valoran los comandos con Opcode de un byte que no 
tienen operando. El código se compone de la posición Tebl$ 
(v) y el correspondiente wvlli) (v). 


Linea 10850 - 10880 
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Aquí se tratan los comandos de 2 bvtes sin operando, el 

primer Opcode es siempre S¡ed (pw (1) = S<ed). El segundo byte 
del Opcode se compone de la posición del comando en teedf 
(v) y wed (i) (v). 

Línea 10890 - 11180; 

Aquí se traducen todos los pseudo-comandos. 

Línea 11190 - 13080; 

Si el comando no pertenece a ninguno de los grupos 

mencionados, se valora en esta porción del programa. Se 

comprueba en primer lugar si el operando op$ (v> contiene 
una coma. En caso a-firmativo se descompone en ol$ (v) 

(porción delante de la coma) y o2í (v) (porción posterior a 
la coma) y ko-flag (v) se activa en -1 (=verdadero). A 
continuación se comprueba la existencia de paréntesis. En 
caso a-firmativo se almacena el contenido de los paréntesis 
en Klin$ (v) y KHlag (v) se activa (= -1). 

Línea 11280 - 11330: 

Si se trata de un comando direccionado de -forma indexada se 
bifurca a línea 11450. 

Línea 11400 - 11440: 

Según la posición en teadr* (V), se bifurca a la rutina de 
tratamiento de comandos. 

Línea 11450 - 11580: 

En los comandos indexados (XY) y (XY + dis) se reemplazan 
con HL y los iflags(V), dísflag(V) se activan 
correspondientemente. Continúa entonces la valoración normal 
de comandos a partir de línea 11390. Después de la 
interpretación, se altera nuevamente la modificación y se 
visualiza el código del comando indexado (el análogo al HL). 

-ínea 11590 - 11750: 

Aquí se interpretan los comandos aritméticos (8 y 16 bits). 
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Linea 11760 - 11820: 

Comandos de rotación y desplajamiento. 

Línea 11830 - 11890: 

Comandos de manipulación de bits. 

Línea 11900 - 12030: 

Bi-furcaciones relativas (JR y DJNZ). 

Línea 12050 - 12210: 

Otras bi-furcaciones (JP, RET, CALL). 

Línea 12220 - 12310: 

Comandos de contador (INC, DEC). 

Línea 12320 - 12620: 

(Ver líneas REM) 

Línea 12630 - 13080: 

Comandos de carga. 


La explicación detallada de todas estas rutinas, excedería los 
límites del presente libro. Seleccionamos como ejemplo la rutina 
para los comandos de manipulación de bits: 


Línea 11840: 

Ip (V)(longitud del comando, es decir número de valores a 
’pokear’) es 2. El primer valor pw(l) (V) es !<CB. Estos 
valores corresponden a todos los comandos bit. 
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Línea 11850: 

o2$(V) (porción del operando posterior a la coma) se 
almacena en ^í(V) para el traspaso a la subrutina a partir 
de línea 13680. La subrutina comprueba si se trata de uno de 
los registros fi, B, C, D, E, H, L o bien (HL). 


Línea 11860: 

Si no se encuentra coincidencia (R-flag = 0) se visualiza el 
mensaje de error "Synta>: Error en operando". De lo contrario 
se devuelve el código del registro en rrr y se activa el 
R+lag. 

Línea 11870: 

Se asigna el valor del número posiclonado delante de la coma 
(del número de bit) a bbb. 

Línea 11880: 

Se comprueba si el número se encuentra en el rango de 0 a 7. 
En caso negativo se visualiza nuevamente "Syntax Error en 
operando". 

Línea 11890: 

Finalmente se almacena el Opcode en pw(2)(V). El Opcode se 
compone de la siguiente -forma: 

01 bbb rrr - para comandos BIT 

10 bbb rrr - para comandos RES 

11 bbb rrr - para comandos SET 

De (zwi - 31) * 64 resultan los bits 7 y 6 del Opcode. zwi 
(V) es la posición del comando en teadr$ (V). bbb*8 
representan los bits 5-3 y rrr los bits 2-0. rrr se 
determina en la subrutina y corresponde al código de 
registro. Si el Opcode está calculado se bi-furca a la salida 
(línea 13100). De -forma similar funcionan asimismo las 
restantes rutinas. 
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Línea 13100 - 13230: 

Salida: si el i-flag (V) (Flag para comandos indexados) está 
activado, se bifurca previamente a la rutina de línea 13310. 

De lo contrario se visualiza la linea completa de 
ensamblador. Si se detectan errores se visualizan los 
mensajes correspondientes y se incrementa fezaiV), el 
contador de errores. 

Antes de bifurcan al comienzo para traducir la línea 
siguiente se inicializan las variables más importantes y el 
mpc (machine program counter) se incrementa en la longitud 
de comando Ip(V). 


Línea 13240 - 13300: 

Si se detecta un error se bifurca a una de estas rutinas, 
que rellenan el string de errores feí(V) con el mensaje 
bifurcando a continuación a la salida. 

Línea 13310 - 13390: 

En este punto se preparan los códigos para los comandos 
indexados. 

Línea 13400 - 13600: 

Al final del programa se visualizan los labels indefinidos, 
el nombre del programa, dirección inicial y final, longitud, 
cantidad de errores y la tabla de variables. 

A partir de la línea 13570 comienza la grabación del código 
objeto producido. 

Línea 13610 - 14150: 

Contiene subrutinas de utilización muy frecuente. 



188 


Ei libro del Lenguaje Máquina del CPC 


Linea 


Linea 


Línea 


Línea 


Línea 


Línea 


Línea 


Línea 


13620 - 13670: 

Se comprueba si a$(V) contiene un label válido. 


13680 - 13720: 

Estas líneas comprueban si a$(V) contiene un registro 
(ft,B,C,D,E,H,L,(HL)). 


13730 - 13750: 

Se comprueba si a$(V) contiene una pareja de registros (BC, 
DE, HL, o SP). 

13760 - 13780: 

Comprobación de que a$(V) contenga una condición (C, NC, Z, 
NZ, PO, PE, P o M). 


13790 - 13850: 

Comprueba si a*(V) es un número y retorna su valor. 


13860 - 14040: 

Estas líneas determinan el valor de 2 bytes de a$(V). a$(V) 

puede representar un número, una variable o un label. 


14050 - 14090: 

Se determina aquí el valor de un byte (Low-byte) de a$. 


14100 - 14150: 

Calcula el o-f-fset para bi-furcaciones relativas. 
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Linea 14160 - 14390: 

Inicialización: se generan los campos de datos y los strings 
para la comparación. vapt(V> apunta a la dirección en la 
cual se encuentra almacenada la longitud de string de zei$(V) 
FNdeek(X) indica el valor de 16 bits de 2 posiciones 
consecutivas de memoria. 

bpc se posiciona inicialmente en la siguiente línea de línea 
1 (=384). 

mpc se carga con S<A000. 
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Lista de variables: 

(SUB signiíica: SUBRUTINA) 


a 

a$ 

adr 

aus 
bbb 
def S 
bemer$ 
bepo 
bpc 
ccc 
c-f lag 


code 

dis$ 
disflag 

disw 

ds 

•f e$ 
•f esa 
i j J j 
i + lag 

ipo 

ireg$ 

klaflag 

klinS 

kotlag 


Traspaso a SUB “carga especial 8 bits" 

Traspaso a diferentes subrutinas 

Traspaso a SUB "calcular offset": direcciún 

bifurcación 

Canal dispositivo salida (0 ó 8) 

Código número bit en comandos manipulación bit 

Palabra reservada de ensamblador 

Comentario en linea ensamblador 

Posición inicial de comentario en línea 

Apuntador programa BASIC 

Código condición de bifurcación 

Activado (="1). si condición encontrada. 

Desactivado (=9) si condición no encontrada, retorna 

SUB "COND TEST". 

Se utiliza para generar el Opcode del comando de 
referencia. 

Contiene la distancia en comandos indexados 
Activado en comando indexado con indicación 

distancia, de lo contrario desactivado. 

Valor de la distancia indicada (complemento a 2). 
Contiene la cantidad de posiciones de memoria 

reservadas por un comando ds. 

Mensaje de error 
Número de errores. 

Contadores para bucles 

Activado en comandos indexados, de lo contrario 

desactivado 

Posición del registro de índice (IX o lY) en el 
operando 

Si se trata de direccionamiento indexado ireg$ 
contiene IX o bien lY 

Activado si el operando contiene paréntesis, de lo 
contrario desactivado. 

Contenido del paréntesis del operando (si existe) 
Activado si el operando contiene coma, de lo 
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contrario desactivado. 

laas - Código ASCII del primer carácter de un label a 
comprobar (SUB "Label-test") 

labt - Retorno del nombre del label desde SUB "Label-test" 
label* - Nombre del label actual 

laze - Longitud de le linea actual de programa fuente 

traducido 

listflag - Activado si se desea listado, de lo contrario 

desactivado 

Ip - Longitud de comando (longitud código objeto) 

Itp - Apuntador a posición libre en tabla de label (lata$) 

(label apuntador tabla) 

mpc - Machine Program Counter; Apunta la posición de memoria 
en la cual se almacena el siguiente código maquina 
mpstart - Dirección inicial del programa maquina 
ñame* - Nombre del programa 

n-flag - Activado si en un comando de carga se trata de 
direccionamiento inmediato, de lo contrario 
desactivado (SUB "carga-especial-8-bit") 
nola-fl - No Label Flag: Activado si la comprobación de label 
tiene resultado negativo, de lo contrario desactivado: 
retorno del SUB "Label-test" 
ol* - Porción de operando delante de la coma 
o2f - Porción de operando posterior a la coma 
of - Offset calculado de SUB Offset 
opí - Operando para el tratamiento 
ope* - Operando, original para salida 

po - Posición de la palabra de comando en el test-string 
pokla - Posición de "Abrir paréntesis" en operando 
poklz - Posición de "Cerrar paréntesis" en- operando 
poko - Posición de la coma en el operando 
pwi - Primer byte del Opcode en direccionamiento indexado, 
es decir S-FF o ?<DF 

rflag - Activado si SUB "Rtest" ha detectado uno de los 
registros A,B,C,D,E,H,L, (HL) de lo contrario 
desactivado 

rrr - Código del registro; retorno de SUB "Rtest" 


sppo - Space Position, posición de espacio en blanco en la 
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t$ 

teadrS 

tebl$ 


teedí 


teps$ 

ultp 

vapt 

wert 

werth 
wertl 
sei í 
zei a$ 
senr 
zi el 
zwi 
zwi$ 


1 ínea 

String de entrada (Menú) 

Test direccionamiento: contiene todos las palabras de 
comando que aparecen con un operando 

Test comandos de un byte: contiene todas las palabras 
de comandos que no tienen operando y que poseen un 
üpcode de 1 byte 

Test Í-.ED: contiene todas las palabras de comando que 
aparecen únicamente sin operando, con un Opcode de 2 
bytes y cuyo primer byte es ?<ED 
Test pseudo: contiene todos los pseudo-comandos 
Apuntador tabla de labels indefinidos: apunta al 
siguiente espacio libre en la tabla ulata$ y udata 
Apuntador variables: apunta a la dirección de zei* en 
la tabla interna de variables 

Valor de una expresión, retorno de SUB "Valoración" o 
bien SUB "Test-número" 

High-byte del valor 

Low-byte del valor 

Contiene la linea actual a tratar 

Contiene la línea actual (original) 

Número actual de línea 

Traspaso de SUB "Calcular Offset" a dirección destino 
Diversas tareas de almacenamiento temporal 
Diversas tareas de almacenamiento temporal 


Tablas: 


lata* (50) 

- Tabla 

de 

wlta (50) 

- Valor 

de 

ulata* (50) 

- Tabla 

de 

udata* (50,2) 

- Datos 

de 

(i,0) 

: Número di 


labels 

labels en tabla de valores 
labels indefinidos 
labels indefinidos 
' línea cuando aparece 
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( 1 . 1 ) 
(i,2) 
wbl (12) 
wed (20) 
reg* (7) 
cond$ (7) 
dregí (3) 


: Dirección del valor a pokear posteriormente 
: Tipo, es decir 16 bit (=2) u Offset (=1) 

- Opcode de comandos 1 byte (tebl$) 

- Opcode de comandos de 2 bvtes teedí) 

- Tabla de registros: B,C,D,E,H,L, (HL), A 

- Tabla de condiciones: NZ, Z, NC, C, PO, PE, a, M 

- Tabla de registros dobles: EC, DE, HL, SP 
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5.2 PROGRAMACION 


Como primer proyecto de programación nos ocuparemos nuevamente de 
la pantalla. 

Suponemos que al programar los ejemplos, no han entrado en 
modalidad 2 antes de arrancar el programa. El resultado es algo 
imprevisible, que les explicaremos a continuación: 

Una vez entrado en modalidad 2, el primer byte de la pantalla, de 
la esquina superior izquierda corresponde a la dirección 5<C000: 

Mediante *P0KE {<0000,255* obtenemos una línea en esta posición. 

Movemos ahora el cursor al borde inferior de la pantalla y 
efectuamos un scrolling moviendo el cursor una posición hacia 
abajo. A continuación movemos el cursor al comienzo de la línea 
media de la pantalla introduciendo nuevamente *P0KE {¡0000,255*, 
veremos entonces dibujarse una línea en el área inferior de la 
pantalla. Si introducimos en cambio »P0KE {<0050,255* la linea 
aparece en la posición primitiva. La diferencia entre {<0000 y 
{<0050 es {<50, es decir 80 en decimal. Esta diferencia corresponde 
a los 80 caracteres de la línea que al producirse el scrolling ha 
"desaparecido" por la parte superior de la pantalla. Si realizamos 
un nuevo scrolling obtenemos la línea mediante *P0KE ¡<00A0,255* 
({<0050 + {<50 = {<00A0). 

La diferencia entre {<0000 y la dirección real del byte superior 
izquierdo de la pantalla se almacena internamente en las 
direcciones {<8109 (Low) y {<B10A (High). Leamos el valor de esta 
posición de memoria de 16 bits. Si no se produce ningún nuevo 
scrolling, obtenemos 
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«PRINT HEX$(PEEK(Í<B1C9)+PEEKÍ8<BACA)*256)* el valor AO 

*PRINT HEX$(PEEK(?íB7C4)+PEEK(S<B7C5)*256)» el valor AO 

*PRINT HEX$(PEEK(8<B7C6)+PEEK(S(B7C7)*256)* el valor AO 

Esta es la di+erencia exacta entre ?<C000 y ?<C0A0. A través de una 
modi-f icaci ón de los contenidos de ?<B1C9 y ÍíBICA tenemos la 
posibilidad de obtener interesantes e+ectos en la pantalla. 

Por ejemplo: 

POR 1=0 TO 255:P0KE !<B1C9,1:PRINT"*":IMEXT :CPC 464 
PQR 1=0 TO 255:P0KE !<B7C4, I:PR1NT“»":NEXT :CPC 664 
POR 1=0 TG 255:P0KE S<B7C4, I:PRINT":NEXT :CPC 6128 

En todas las operaciones relacionadas con la pantalla hemos de 
tener en cuenta esta diferencia. 

Considerando la diferencia producida por el scrolling, queremos 
ahora modificar el programa para invertir el carácter superior 
izquierdo de la pantalla. 

En primer lugar cargamos HL nuevamente con ?<C000. Dado que 
trabajamos en ensamblador, almacenamos ?(C000 en una variable. 

El programa se arranca como de costumbre a partir de la dirección 
?<A000. Las primeras lineas se representan de la siguiente manera: 


10 ’Bildad EQU ÍíCOOO ; Dirección base pantalla 
20 ’ORG SíAOOO 
30 ’LD HLjBildad 


Ahora debemos sumar la diferencia a la dirección base. 
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40 ’LD DE, (!<B1C9) ; "diferencia de scrolling 
50 ’ADD HL,DE ; Calcular dirección inicial 


El comando de carga de 16 bits LD DE, (?iBlC9,' en línea 50 carga Low 
y High bytes en la pareja de registros DE. Procedemos ahora de 
igual -forma que en el programa del capítulo 4.10. 


60 ’LD DE,?<B00 ; Di-ferencia 

70 ’LD B,B ; Contador bucle 

80 ’ LD A,(HL) ; Matriz de bits actual 
90 ’CPL ; Invertir 

100 ’LD (HL),A ; Almacenar nuevamente 
lio ’ADD HL,DE ; Sumar di-ferencia 


ADD HL,DE puede provocar que HL exceda el valor ÍíFFFF. 
Ejemplo: 


HL=!<F9A0 DE=«<800 


Después ADD HL,DE : 

HL=!<01A0 Carry=l 

Seguramente ésta no será la dirección correcta en la memoria de 
pantalla, ya que en esta dirección se encuentran nuestros 
programas BASIC. Los puntos almacenados en las direcciones 
superiores a ?<FFFF se encuentran en dirección S<C000. 

Si se produce un desbordamiento (CF=1), hemos de sumar !<C000 a HL. 
Intenten ahora completar ustedes este programa en lenguaje 
máquina. 
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Solución: 

120 ’CALL CjDIFADD ; Subrutina para corrección 
130 ’DJNZ wieder ; Repetir 8 veces 
140 ’RET ; Retorno Subrutina 

150 ’DIFADD PUSH DE ; Subrutina arranque, salvar DE 

160 ’LD DEjbildat ; Bi ldat=?<C000 

170 ’ADD HL,DE ; Sumar a HL 

180 ’POP DE ; Extraer DE 

190 ’RET ; Retorno subrutina 

200 ’END 

Descripción: 

Línea 120: 

Si se ha producido un desbordamiento se bifurca a la rutina 
de corrección 

Lineas 150 y 190: 

Todas las parejas de registros han sido utilizadas. La 
adición de 16 bits es posible únicamente mediante el 
direccionamiento implícito. Por ello se almacena 
temporalmente el contenido de DE mediante PUSH DE en el 
stack, extrayéndolo nuevamente después de la adición, 
mediante POP DE. 

Ensamblemos el programa y observemos el listado: 


AOOO 


10 

BILDAD 

EQU 

AOOO 


20 


ORE 

AOOO 

210000 

30 


LD 

A003 

ED5B5B09B1 

40 


LD 

A007 

19 

50 


ADD 

A008 

110008 

60 


LD 

AOOB 

0608 

70 


LD 

AOOD 

7E 

80 

WIEDER 

LD 

AOOE 

2F 

90 


OPL 


8(0000 j dirección pantalla 

JíAOOO 

HLjBILDAD 

DE, (Í<B1C9) ; “diferencia scolling" 

HL,DE ; nueva dirección inicial 

DE,!<800 ; diferencia 

B,8 ; contador bucle 

A,(HL) ; matriz actual de bits 

¡ invertir 
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AOOF 

77 

100 

LD (HL),A ; almacenar nuevamente 

AOlO 

19 

lio 

ADD HL,DE ; sumar diferencia 

AOll 

DCOOOO 

120 

CALL C,DIFADD ; subrutina correcc: 

A014 

10F7 

130 

DJN2 WIEDER 

A016 

C9 

140 

RET 

tt** 

1 ínea 

120 : DIFADD = 

A017 

A017 

D5 

150 DIFADD 

PUSH DE ; salvar DE 

A018 

llOOCO 

160 

LD DE, BILDAD ; =!¡C000 

AOIB 

19 

170 

ADD HL.DE ; sumar a HL 

AOIC 

DI 

180 

POP DE 

AOID 

C9 

190 

RET 


Programa: Invertir 
Inicio: SiAOOO Final: !<A01D 
Longitud: OOIE 
0 Errores 

Tabla de variables: 

BILDAD COOO WIEDER AOOD DIFADD A017 

En línea 130 se bifurca al label DIFADD, aunque el mismo se define 
en línea 150. Por ello se almacena momentáneamente DCOOOO como 
código. Al traducir la línea 150 el ensamblador encuentra el label 
DIFADD e indica que el mismo aparece en línea 120. El código 
DCOOOO se transforma automáticamente, lo mismo puede ocurrir con 
comandos JR y JP. Este problema se produce al realizar una 
bifurcación hacia adelante en el programa. 

Esta forma de tratamiento descrita para las bifurcaciones hacia 
adelante es necesaria dado que se trata de un ensamblador de un 
paso, lo que significa que el ensamblador repasa el programa 
fuente una única vez. 

Un ensamblador de 2 pasos, en cambio, en el primer paso busca 
únicamente todas las variables y labels, asignando sus valores 
correspondientes. En el segundo paso se realiza la traducción. 
Ensambladores profesionales realizan varios pasos (PASSES). En 
nuestro caso, el ensamblador de un paso es más adecuado porque se 
ejecuta en la mitad de tiempo que el ensamblador de 2 pasos. 
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Volvamos al programa: 

Existen naturalmente otras soluciones para este programa. En 
primer lugar es importante que el programa obtenga los resultados 
deseados. Es aconsejable buscar la versión más breve y mas rápida. 

En los programas siguientes no nos -fijaremos tanto en la velocidad 
de ejecución y en la ocupación de memoria, sino en la -facilidad de 
comprensión de las soluciones. 

HL no puede ser en ningún caso menor que Í'COOO. H puede adoptar 
valores entre ÍíCO y ?<FF. En todos los valores los bits superiores 
(número 7 y 6) están activados. Para prevenir posibles errores 
podemos activar estos bits en cada paso del bucle. En este caso 
podemos olvidar la subrutina de línea 160 y escribir en línea 130: 

130 ’SET 6,H 
135 ’SET 7,H 

Con la interrelación OR podemos resolver con mayor rapidez esta 
tarea (OR permite activar bits individualmente). 

85 ’LD C,J<X 11000000 
130 ’LD A,H 
133 ’OR C 
135 ’LD H,A 

Los programas de manipulación de pantalla realizados hasta el 
momento, pueden asimismo adaptarse a una formulación estándard 
teniendo en cuenta la diferencia del scrolling. Las modificaciones 
pertinentes quedan a su elección. 


Rutinas BASIC del monitor 

Hemos visto hasta ahora el procedimiento del ensamblador pero 
quedan aún por comentar algunas utilidades que optimizan el 
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trabajo en lenguaje máquina, entre ellas el llamado ’MONITDR’. 

No se trata del monitor (pantalla) de su ordenador, sino de un 
programa que permite por ejemplo comprobar el contenido de la 
memoria, visualizarlo y modificarlo (inglés to monitor: 
comprobar). Un monitor ofrece asimismo la posibilidad de 
almacenar, cargar y arrancar programas máquina. A continuación 
programaremos algunas funciones de un monitor de este tipo en 
lenguaje máquina. 

De esta manera "matamos 2 pájaros de un tiro": 

se exponen aquí técnicas fundamentales de programación obteniendo 
como resultado un programa monitor. 

Como ya hemos mencionado, la tarea fundamental de un programa 
monitor es la de visualizar el contenido de la memoria. Ello puede 
realizarse en BASIC mediante comandos FEEK. 

Confeccione un programa que al introducir la dirección inicial (V) 
y la dirección final (V) le proporcione los contenidos intermedios 
de memoria. Utilice para la salida el formato usual para un HEX 
DUMP (salida de contenidos de registros en formato hexadecimal), 
de la siguiente manera: 

Dump hexadecimal desde dirección ?(10 hasta S<27: 

0010 C3 16 EA C3 10 BA D5 C9 C.:C.:UI 

0018 C3 BF B9 C3 B1 B9 E9 00 C?9C19i. 

0020 C3 CB BA C3 B9 B9 00 00 CK:C99.. 

En los equipos CPC 664 y CPC 6128 obtendremos lamentablemente 

otros valores en el Hex Dump 

Su programa debe generar la misma imagen que el nuestro. La 
secuencia de códigos ha de ser necesariamente exacta. 

Debe tenerse en cuenta, que en la porción derecha y a continuación 
de una línea de Hex-dump se visualiza la representación ASCII de 
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los códigos correspondientes. Los códigos de valor superior a 127 
se decrementan previamente en 128 y los códigos no representadles 
(0-31) se visualizan como puntos. 

Solución: 

10 REM Rutinas de Monitor BASIC 
20 MODE 1 
30 INPUT inicio 
40 INPUT -final 

50 POR i=inicio TO final STEP 8 
60 ascii$="" 

70 PRINT HEXí(i,4);" 

80 POR j=0 TO 7 
90 w=PEEK(i+j) 

100 PRINT HEX$(w,2);" 
lio IP w > 127 THEN w=w-128 
120 IP w<32 THEN w=46 
130 ascii*=ascii$+CHRÍ(w) 

140 NEXT j 

150 PRINT" "jasciiíj 
160 NEXT i 
170 END 


Con este programa pueden visualizar el contenido completo de la 
memoria RAM. Introduzca en su programa monitor la línea siguiente: 

1 REM Esta es la primera línea 


Veamos el contenido de memoria desde 8<170 hasta ?(200. En la 
representación ASCII de los contenidos de memoria vemos la primera 
línea, es decir el comentario "Esta es la primera línea". A partir 
de !il70 se almacenan los programas BASIC en la memoria. A 
continuación del programa BASIC hay una página de todas las 
variables del programa, administrada internamente, donde para 
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variables numéricas se almacena directamente el valor numérico y 
para variables de string se almacena la dirección y la longitud de 
la cadena de caracteres. Las variables se almacenan en la 
secuencia de su aparición en el programa. 

Los programas pro-fesionales monitor, o-frecen la posibilidad de 
modificar directamente el contenido de memoria a través de la 
pantalla. Hasta aquí el comando M (Monitor) del programa. 


Rutina Fill 


Veamos ahora la rutina "Fill", que se utiliza para rellenar un 
área de memoria individualizada, con un valor -fijo. De esta 
manera por ejemplo, puede borrarse la memoria de pantalla 
completa, es decir, rellenarla con ceros. El comando F (Fill) se 
utiliza por ejemplo para obtener condiciones determinadas en el 
contenido de la memoria antes de la ejecución del programa. 
Tenemos el siguiente ejemplo: 

El programa' BASIC requiere la entrada de la dirección inicial y 
final del area a rellenar y el valor con el cual queremos 
inicializar la misma. En el programa BASIC, debe comprobarse si la 
dirección inicial (V) es menor que la dirección final (V) y si se 
trata de números de 2 bytes, es decir números entre 0 y 2''16-1. 
Debe comprobarse también el valor (V) por el área 0-255 (1 byte). 
Estos 3 valores (5 bytes) se "F'OKEAN" en posiciones fijas de 
memoria, para tenerlos disponibles después de la llamada a la 
rutina FILL de lenguaje máquina. El programa maquina debe realizar 
el "relleno", retornando a continuación al BASIC. 

Presentamos seguidamente el programa BASIC que realiza la entrada 
de esta forma y que comprueba los criterios mencionados. 
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10 MEMORY ?<9FFF 
90 MODE 2 

100 LOCATE 10,5: PRINT"PROBRAMA MONITOR" 
lio LOCATE 5,8: PRINT"?" 

120 LOCATE 7,10: INPUT "DIRECCION INICIAL;",START 
130 IF START < O OR START <= 2''16 THEN 120 
140 IF START O INT<START) THEN 120 
150 LOCATE 7,11: INPUT "DIRECCION FINAL:",ENDE 
160 IF ENDE <= START OR ENDE > = 2''16 THEN 150 
170 IF ENDE <> INT(ENDE) THEN 150 
180 LOCATE 7,12: INPUT "VALOR:", VALOR 

190 IF VALOR < O OR VALOR > 255 OR (VALOR O INT(VALOR)) 

THEN 180 

200 POKE ?;A000, VALOR 

210 POKE !<A002, INT(START/256): POKE ?<A001, START-1NT 
(START/256)*256 

220 POKE S<A004, INT (ENDE/256); POKE !<A003,ENDE-INT 
(ENDE/256)*256 
230 CALL Í(A005 
240 END 


Para este programa máquina el valor (V) se encuentra en la 
dirección í<A000, la dirección inicial a partir de ?<A001 (Low-High) 
y la dirección -final a partir de ?<A003 (Low-high). Dado que las 
primeras posiciones de memoria a partir de JíAOOO están ocupadas, 
arrancamos el programa máquina a partir de dirección S(A005. 


La primera porción del programa fuente: 

10 ’ 0R6 ?<A005 

20 ’START EQU iAOOl 
30 ’ENDE EOU t<A003 
40 'VALOR EQU ?<AOOO 
50 ’ LD A,(VALOR) 

60 ’ LD DE,(START) ; Apuntador bloque 
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Descripción del programa: 

Linea 10: 

Inicia el programa en ?<A005 
Línea 20-40: 

Para mayor claridad se de-finen las direcciones de los datos 
traspasados (direcciones de transferencia) como variables. 
Para cualquier modificación es necesario únicamente alterar 
el valor en la definición de la variable. 

Línea 50-60: 

El valor se carga en el ACU (1 byte), la dirección final en 
la pareja de registros HL (2 bytes) y la dirección inicial 
en la pareja de registros DE (2 bytes). 

De esta manera llegamos finalmente a la rutina FILL. 

Presentamos en primer lugar la solución mas aproximada: 


70 

'BUCLE LD 

(DE).A 

80 

’ INC 

DE 

90 

’ LD 

HL,(ENDE 

100 

’ SBC 

HL,DE 

lio 

’ JR 

N2,BUCLE 

120 

’ LD 

(DE),A 

130 

’ RET 


140 

’ END 



Escribir valor 
Incrementar apuntador 
Calcular 
si ya llegado 
al final? 

Rellenar ultimo elemento 


Descripción del programa: 


Línea 50: 

Cargar HL con dirección final (V) 


Linea 70: 

Inicio del bucle. Almacenar en HL el valor (A). 
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Línea 80: 

Incrementar apuntador dirección '.D£). 

Línea 100: 

Sustracción 16 bits de dirección actual de la dirección 
■final (HL-DE) 

Línea 110: 

Si el apuntador DE es menor que la dirección -final sn HL, el 
•flag 2 no queda activado, dado que HL - DE es di-ferente de 
cero. En este caso (N2) se ti-furca ai inicio del bucle 
(BUCLE). Si HL es igual a DE, entonces 2=1 y se ejecuta el 
siguiente comando (Línea 120). 

Línea 120: 

Aquí se almacena el mismo valor A (= contenido ACL) en la 
dirección -final del area a rellenar. Esto hasta ei. ms.Tiento 
no se había realizado (¿Por qué?) 

Línea 130: 

Retorno al BASIC. 

Si traduce este programa mediante el ensamblador Obtendrá el 
listado siguiente: 


AOOO 


10 

START 

EQU 

!<A001 


Aoao 


20 

ENDE 

EQU 

!<A003 


AOOO 


30 

VALOR 

EQU 

8(A000 


A005 


40 


ORS 

ÜiAOOS 


A005 

3A00A0 

50 


LD 

A,(VALOR) 


A008 

ED5B01A0 

60 


LD 

DE,(START) 

; Apuntador bloque 

AOOC 

12 

70 

BUCLE 

LD 

(DE),A 

; Almacenar valor 

AOOD 

13 

80 


INC 

DE 

; Incr. apuntador 
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AOOE 

2A03A0 

90 

LD 

HL.(ENDE) 



AOll 

ED52 

100 

SBC 

HL,DE 

; Final? 


A013 

20F7 

lio 

JR 

NZ,BUCLE 

; No, seguir 


A015 

12 

120 

LD 

(DE),A 

; Rell. ultimo 

ele. 

A016 

C9 

130 

RET 





Programa: FILL 
Start: S(A005 Ende: !<A016 
Longitud: 0012 
0 Errares 

Tabla de variables: 

START AOOl ENDE A003 VALOR AOOO BUCLE AOOC 

Con-feccione un cargador BASIC para este programa integrando el 
programa FILL. 

20 FOR I=!<A000 TO ?<A016; READ A$: A=VAL("?<"+A$): POKE I,A: NEXT 

25 DATA FF,00,C0,FF,FF 

30 DATA 3A,00,A0,ED,5B,01,A0,12 

40 DATA 13,2A,03,A0,ED,52,20,F7 

50 DATA 12,C9 

Como ya hemos mencionado, el presente programa es la posibilidad 
más simple para realizar la rutina FILL. Pero resulta 
excesivamente largo y lento. 

La solución mas rápida la tendremos utilizando comandos de carga 
de bloques. Para rellenar un área hemos de utilizarlos 
concientemente de manera incorrecta <vean capítulo 4.3). 

Programa -fuente; 

(Líneas 10-70 como el anterior) 


80 

’SBC 

HL,DE 

5 

Longitud del bloque 


90 

’LD 

B.H 


Contador de bytes 


100 ’LD 

C.L 


Cargado con longitud 

bloque 

lio 

’LD 

H,D 

$ 

Bloque fuente inicial 

(HL) 
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120 ’LD ¡_,E ; Cargar con dirección inicial 

130 ’INC DE ; Dirección destino = dirección inicial + 1 

140 ’LD (HL)¡,A ; Cargar primer byte -fuente con valor 

150 'LDIR 

160 ’RET 

170 ’END 

Traduzca el programa máquina para un cargador BASIC. Arranque el 
programa BASIC seleccionando la dirección inicial SiCOOO, la 
dirección final S<CFFF y el valor JtFF. 

El bloque se encuentra en el área de pantalla. Valor = ?<FF = 
!<X1111 lili corresponde a 8 puntos activados. Como resultado 
debemos obtener líneas horizontales de un punto de espesor. 


Rutina TRANSFER 

A continuación utilizaremos "correctamente" los comandos de carga 
de bloques, para confeccionar una rutina de transferencia. Este 
programa debe transferir un área de memoria a otra posición. Con 
la ayuda de un programa BASIC debe proporcionarse la dirección 
inicial y final del bloque fuente así como la dirección inicial 
del bloque destino, comprobando que son correctas. Para la 
transferencia utilizamos las direcciones siguientes: 

Inicio bloque fuente; ?<A020/!(A021 
Final bloque fuente: !(A022/!<A023 
Inicio bloque destino: !<A024/!<A025 

La dirección inicial del programa máquina es entonces &A026. 


El bloque fuente y el bloque destino no deben solaparse, de esta 
forma el bloque destino siempre tendrá los valores correctos 
aunque el bloque fuente sea sobreescrito. 
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Programa Fuente: 

5 'RUTINA DESPLAZAMIENTO BLOQUE 


10 ’OANF 

EQU 

S<A020 

; Dirección inicial bloque Fuente 

20 'QEND 

EQU 

!<A022 

; Dirección Final bloque Fuente 

30 ’ZANF 

EQU 

8íA024 

; Dirección inicial bloque destino 

40 ’ORG 

EQU 

S<A026 

; Inicio programa 

45 ’ ; INIC 

10 PROGRAMA, OBTENER 

LONGITUD BLOQUE 

50 ’ 

LD 

HL,(QEND) 


60 ’ 

LD 

DE,(QANF) 


70 ’ 

OR 

A 

; Borrar carry para SBC 

80 ’ 

SBC 

HL,DE 

; = Longitud bloque - 1 

90 ’ 

INC 

HL 

; + 1 = longitud bloque 

100 ’ 

LD 

B,H 

; Longitud bloque 

lio ’ 

LD 

C,L 

! Almacenado en BC 

115 ■’ ; Decisión 

por incrementar 

o decrementar 

120 ’ 

LD 

HL,(QANF) 


130 ’ 

SBC 

HL,DE 

; ZANF menor que 

140 ’ 

JR 

C,LADINC 

; QANF, entonces LADINC 

150 ’ 

SBC 

HL,BC 

; DiFerencia menor que 

160 ’ 

JR 

NC,LADINC 

; Longitud bloque, entonces LADINC 

170 ’ 

LD 

HL,(ZANF) 


180 ’ 

ADD 

HL,BC 

; ZANF mas longitud 

190 ’ 

DEC 

HL 

; - 1 = Final bloque destino 

200 ’ 

EX 

DE,HL 

; Cargado de HL hacia DE 

210 ’ 

LD 

HL,(QEND) 

; Final bloque Fuente 

220 ’ 

LDDR 



230 •’ 

RET 



240 ■' ; CARGA BLOQUE INCREMENTAR 


250 ’LADINC 

EX 

DE,HL 

; Inicio Fuente de DE hacia HL 

260 ’ 

LD 

DE,(ZANF) 



270 ’ LDIR 

280 ’ RET 

290 ’ END 
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El inicio y -final del programa no necesitan mayores explicaciones. 
La porción intermedia es algo más difícil dado que es aquí donde 
se decide si debe utilizarse el comando LDDR o bien LDIR (líneas 
115-160). Observemos la necesidad de esta decisión (capítulo 2.3). 
En el caso normal, es decir si no hay solapamiento de los bloques 
utilizamos el comando LDIR. Si la dirección inicial de destino es 
menor que la dirección inicial del bloque fuente, puede también 
utilizarse el comando LDIR. Mediante la sustracción de la linea 
130 y la bifurcación de la línea 140, se dirige a carga bloque 
incrementar en el caso de Zanf menor que Qanf. Si Zant es mayor o 
igual que Qanf, ha de determinarse si Zanf es menor o igual que 
Qend. 

Zanf <= Qend 

Zanf <= Qanf + Longitud - 1 
Zanf - Qanf - Longitud <= -1 
HL - BC ■(= -1 

Si después de HL - BC queda el carry activado (resultado menor o 
igual que -1), debe entonces utilizarse el comando LDDR. -Si el 
carry es igual 0, HL - BC tuvo un resultado mayor o igual a 0, por 
lo tanto Zanf no se encuentra en el bloque fuente, bifurcando 
seguidamente a LDIR. 

Para incorporar este programa en el monitor debemos almacenarlo er 
líneas DATA. En un programa de esta longitud se producen 

frecuentemente errores; para evitarlos tenemos 2 posibilidades. 
Durante la lectura de las lineas DATA se suman todos los valores 

leídos y la suma final se comprueba con una suma de comprobación. 

Si la suma final no coincide con la suma de comprobación, se 

detecta un error. En nuestro caso ello se representa de la 

siguiente manera: 

10 FÜR I=!<A020 TO Í<A051 

20 READ A$: A=VAL('‘?<“+A«): POKE I,A: S=S+A: NEXT 
30 DATA 00,SO,FF,BF,00,CO 
40 DATA 2A,22,A0,ED,5B,20,A0,B7 
50 DATA ED,52,23,44,4D,2A,24,A0 
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60 DATA ED.52,38,10,ED.42,30,OC 
70 DATA 2A,24,A0,0?,2B,EB,2A,22 
80 DATA A0,ED,B8,C9,EB,ED,5B,24 
90 DATA A0,ED,B0,C9 

100 IF S O 5186 THEN PRINT "ERROR EN DATAS" ELSE PRINT "OK!" 

Para nosotros es mas simple la segunda posibilidad: 

Después del listado de ensamblador del programa, seguramente habra 
grabado el código objeto generado en el cassette (diskette). Con 
ILOAD "Nombre programa"* puede cargarse este programa desde un 
programa BASIC. 

Un programa monitor debería o-frecer asimismo la posibilidad de 
cargar y almacenar programas en lenguaje maquina. 


Con la ayuda de LOAD "Nombre",Direcci6n y 

SAVE "Nombre",B,Dirección inicial,Longitud 


Podemos realizarlo -fácilmente. 

Si agrupamos todas las -funciones 
siguientes: 

- M - (inglés Monitor) 

- F - (inglés Fi 11) 

- T - (inglés Trans-fer) 

- L - (inglés Load) 

- S - (inglés Save) 


su monitor "conoce" los comandos 


Visualizar área memoria 
Rellenar área con valor .(V) 
Desplazar areas 
Cargar programas máquina 
Grabar programas máquina 


Rutina COMPARE 

Nos ocuparemos a continuación de la rutina COMPARE, que se utiliza 
para la comparación de 2 áreas de memoria. La abreviación del 
comando es C. Como entradas desde un programa BASIC, la rutina 
necesita la dirección inicial y -final del bloque fuente y la 
dirección inicial del bloque a comparar. Todas las direcciones del 
bloque a comparar en las cuales los valores almacenados no 
coincidan con los correpondientes del bloque fuente, deben 
visualizarse. 
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Programa Fuente 


10 ’ 

ORS 

?<A060 



20 ’FLA6 

DB 

1 



30 ’ANF 

DS 

2 



40 'ENDE 

DS 

O 



50 ’ANFVER 

DS 

2 

5 

Inicio Bloque comparación 

60 ’ 

LD 

DE,(ANF) 



70 ’ 

LD 

HL,(ENDE) 



80 ’ 

OR 

A 



90 ’ 

SBC 

HL,DE 

|l 

= Longitud bloque 

100 ’ 

INC 

HL 

5 

+ 1 

lio ’ 

LD 

B.H 



120 ’ 

LD 

C,L 

5 

Almacenado en BC 

130 ’ 

EX 

DE,HL 

? 

ANF hacia HL 

140 ’ 

LD 

DE,(ANFVER) 

9 

Apuntador bloque 

150 ’WEITER 

LD 

A, (DE) 

? 

Elemento de comparación 

160 ’ 

INC 

DE 



170 ’ 

CPI 



Comparación (HL) con A 

ISO ’ 

JR 

NZ,AUS&A 

9 

Desigual entonces salida 

190 ’ 

JP 

PE,WEITER 

9 

Siguiente elemento 

200 ’ 

LD 

A,B 



210 ’ 

LD 

(FLAG),A 

•1 

Final, flag = 0 

220 ’ 

RET 




230-’AUSGA 

LD 

(ANF),HL 



240 ’ 

LD 

(ANFVER),DE 



250 ’ 

RET 

PE 

• 

9 

Aun no final bloque 

260 ’ 

DEC 

B 

S 

B=255 

270 ’ 

LD 

A,B 



280 ' 

LD 

(FLAG),A 

f 

Flag=255 

290 ’ 

RET 


9 

Final bloque 

300 ’ 

END 





En las líneas 20-50 se reserva espacio de memoria para los datos a 
transferir. Para ello se utilizan los pseudo-comandos. El comando 
DB (Define Bytes) almacena el valor indicado como operando en la 
dirección actual. En nuestro caso se almacena el valor 1 en 
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dirección !<A060. Esta posición de memoria sirve como tlag para la 
comunicación con el programa BASIC. El -flag puede obtener los 
valores siguientes; 

1 - Se ha detectado desigualdad en la comparación, el bloque no 

se ha comparado aún en su totalidad. 

0 - El bloque se ha comparado íntegramente 

255 - El bloque se ha comparado íntegramente y en el último 
elemento del mismo se ha detectado desigualdad. 

En las líneas 30 y 50 se encuentran pseudo-comandos DS (De-fine 
Storage): reserva espacio de memoria. El pseudo-comanoo DS indica 
al ensamblador que referencie el mpc para incrementar el número 
determinado de posiciones de memoria. De esta manera se reserva 
este espacio y podemos almacenar en el mismo las variables de 
transferencia. En nuestro caso necesitamos para el almacenamiento 
de ANF, ENDE y ANFVEF: 2 bytes para cada una (Low y High bytes de 
la dirección), y por ello hemos utilizado DS 2, 

En las líneas 60-120 cargamos el byte counter BC con la longitud 
del bloque fuente. El comando INC HL de línea 100 es necesario, ya 
que de lo contrario no se compararía el último elemento. 

En línea 130 se carga HL con la dirección inicial del bloque 
fuente y en línea 140 se carga DE con la dirección inicial del 
bloque a comparar. 

A partir de línea 150 comienza el bucle principal del programa. En 
primer lugar cargamos el ACU con el valor del bloque de 
comparación (150), y el apuntador en el bloque de comparación se 
incrementa (160). CPI tiene varias funciones. Compara el contenido 
del ACU (= valor de un elemento del bloque de comparación) con el 
valor en dirección HL (= valor de un elemento del bloque a 
comparar). Según el resultado de la comparación se altera el flag 
Z. Seguidamente se incrementa HL y se decrementa BC. Si BC resulta 
igual 0 se reinicializa el P/V (PO), de lo contrario se activa 
(PE). 
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En línea 180 se bifurca a la salida si los valores comparados han 
resultado diferentes. De lo contrario se repite el bucle descrito 
medíante línea 190, si P/V = 0, es decir valor PE. Si por el 
contrario P/V es 1, el flag es 0 según línea 200 resultando un 
retorno al BASIC. 

A partir de linea 220 comienza la porción de programa para la 
salida. 

En primer lugar se almacenan los apuntadores actuales de bloque. 
DE contiene'la dirección de la posición ce memoria incrementada en 
1, que no representa igualdad. Después de la salida de esta 
dirección mediante el programa BASIC, se llama nuevamente a la 
rutina continuando en la posición correcta, dado que ANF y ANFVER 
se nan actualizado antes de bifurcar al BASIC mediante las líneas 
230 y 240. Si el bloque no ha sido comparado totalmente, es decir 
BC O 0 y P/V = 1 o bien PE, se ejecuta el comando RET, Si por el 
contrario se ha comparado ya el último elemento tno hay igualdad) 
entonces a través de las lineas 200-280 el flag V obtendrá el 
valor 255 diferenciando de esta forma este caso del de comparación 
completa con resultado de igualdad. 


A060 


10 

ORE 

S<A060 



AOíjO 

01 

20 FLAS 

DB 

1 



A061 


30 ANF 

DS 




A063 


40 ENDE 

DS 

2 



A065 


50 ANFVER 

DS 


5 

Inicio bloque comp 

A067 

ED5B61A0 

60 

LD 

DE,(ANF) 



A06B 

2A63A0 

70 

LD 

HL, (ENDE) 



A06E 

B7 

80 

OR 

A 



A06F 

ED52 

90 

SBC 

HL,DE 

? 

Longitud bloque 

A071 

23 

100 

INC 

HL 


HL + 1 

A072 

44 

lio 

LD 

B,H 



A073 

4D 

120 

LD 

C,L 

■ 

9 

Cargar hacia BC 

A074 

EB 

130 

EX 

DE,HL 

5 

ANF hacia HL 

A075 

ED5B65A0 

140 

LD 

DE,(ANFVER) 

9 

Apuntador bloque 

A079 

lA 

150 WEITER 

LD 

A,(DE) 


Ele. comparación 

A07A 

13 

160 

INC 

DE 
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A07B EDAl 

170 

CPI 


; Comp. (HL) con A 

A07D 20FE 

180 

JR 

NZ,AUSGA 

; Salida por desigual 

A07F EA79A0 

190 

JR 

PE,WEITER 

; Siguiente ele. 

A082 78 

200 

LD 

A,B 


A083 2260A0 

210 

LD 

(FLAG),A 

: Final FLAG=0 

AOSó C9 

220 

RET 



LINEA ISO: 

AUSGA = A087 



A087 226lAO 

230 AUSGA 

LD 

(ANF),HL 


A08A ED5365A0 

240 

LD 

(ANFVER).DE 


AOBE E8 

250 

RET 

PE 

; Aun no es fin blq. 

A08F 05 

260 

DEC 

B 

¡ B=255 

A090 78 

270 

LD 

A,B 


A091 3260A0 

280 

LD 

(FLAG),A 


A094 C9 

290 

RET 


; Fin bloque 


Programa: COMPARE 
itart: ?;AOSO Ende: ?íA 094 
Longitud: 0035 
0 Errores 

Tabla de variables: 

FLAG AOáiO ANF A061 ENDE A063 ANFVER A065 
WEITER A079 AUSGA A087 

El programa BASIC para la llamada de esta rutina es el siguiente: 


10 REM COMPARE 
20 MEMORY ?<9FFF 
30 MODE 2 
40 POKE S<A060,1 

50 INPUT "INICIO BLOQUE ;!<",A$ 

60 ADR=!!<A061: 60SUB 170 
70 INPUT "FINAL BLOQUE :?i",A$ 

80 ADR=5<A063: GOSUB 170 

90 INPUT "INICIO BLOQUE COMPARACION :?.7',A$ 
100 ADR=S(A065: GOSUB 170 
lio CALL S<A067 
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120 W=PEEK(?<A060) 

130 IF W=0 THEN END 

140 PRINT HEX$(PEEK(j!A061)+256»PEEK(SíA062)-l,4) 
150 IF W=1 THEN 110 
160 END 

170 A=VAL("?<"+A$) 

180 IF A<0 THEN A=A+2''16 
190 AH = INT(A/256) 

200 POKE ADR,A-AH»256 
210 POKE ADR+1,AH 
220 RETURN 


El comando GO (6), la llamada de un programa máquina desde el 
programa monitor (por ejemplo para test), puede programarse 
■fácilmente con el comando BASIC *CALL Dirección* y la 
correspondiente rutina de entrada para la dirección (V). 


En el programa COMPARE, las conmutaciones entre BASIC y lenguaje 
máquina son bastante laboriosas y poco comprensibles. La unión 
entre lenguaje máquina y BASIC es necesaria porque no podemos aún 
programar entradas y salidas (es decir Inputs/Print) en lenguaje 
máquina. Estas rutinas son relativamente complejas. Para 
visualizar por ejemplo un carácter en la pantalla debe calcularse 
la posición correcta del carácter teniendo en cuenta la diferencia 
por scrolling. A continuación deben extraerse los S bytes 
necesarios para la representación del carácter desde la memoria de 
caracteres (ROM ?<3800 hasta S<3FFF) y almacenar todo ello en la 
memoria de pantalla. Dado que la salida de un carácter en la 
pantalla funciona al conectar el ordenador, la rutina 
correspondiente ha de estar incorporada previamente al ROM. 
Conociendo esta rutina o por lo menos su dirección inicial, 
podríamos llamarla directamente desde nuestro programa en lenguaje 
máquina. Esta posibilidad de llamar rutinas del sistema con la 
ayuda del lenguaje máquina, es muy útil e interesante. 
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CAPITULO VI: UTILIZACION DE RUTINAS DEL SISTEMA 


6.1 EL DISASSEMBLER EL SIMULADOR PASO A PASO 

El CPC posee 32K de ROM. Estos 32 Lilobytes contienen rutinas del 
sistema. Los 16 kbytes superiores del ROM (?<C000 hasta ?-:FFFF) 
contienen el BASIC, los 16 kbytes in-feriores (?¡0 hasta Sí 3FFF) 
contienen el sistema operativo del ordenador. El sistema operativo 
incluye muchas rutinas que son de interés para el programador de 
lenguaje máquina. 

Para analizar estas rutinas necesitamos otra "herramienta" 
adicional, el disassembler. 

Un disassembler interpreta los bytes de un area determinada de 
código maquina y traduce los códigos a los correspondientes 
comandos de ensamblador. Asi el disassembler realiza la tarea 
inversa que el ensamblador. Con el disassembler podemos traducir 
programas maquina cargados en el ordenador, a sentencias de 
ensamblador. De igual modo pueden traducirse rutinas internas del 
sistema. De estos programas confeccionados por profesionales 
pueden copiarse algunas cosas y ademas podemos utilizar las 
rutinas en nuestros propios programas. 

El programa siguiente "Disassi+Simula" contiene entre otras cosas 
un disassembler. Después de entrar el programa arránquelo con 
*RUN*; el asterisco que aparece en el borde izquierdo indica que 
se espera una entrada. En las primeras líneas de la pantalla se 
visualiza además "Modalidad de Entrada". Elija entonces en primer 
lugar el disassembler mediante la letra "d". 

La "D" que se visualiza indica que ha sido reconocida su 
inserción. Introduzca a continuación del carácter ?< la dirección 
del desensamblaje. Pruebe con 20 y pulse tRETURN* o ÜENTER». 
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Un segundo carácter & indica que además debe introducir la 
dirección final. Introduzca 22 para esta primera prueba. A 
continuación comienza el disassembler. 

0020 C3C6BA JP !íBACB 

(En el 664 JP ?íBAC 6 / en el 6128 JF ?<BAC6) 

Continúe el desensamblaje en la dirección de bifurcación indicada. 
Para ello debe llamar nuevamente el disassembler mediante "D". 
E;;i5te además una posibilidad más cómoda! 

Si se encuentra en la modalidad de entrada, puede llamar 
nuevamente la función recién ejecutada pulsando ÍRETURN* o 
*ENTER*. Introduzca ahora la dirección de bifurcación que acaba de 
traducir y concluya con ^RETURN» o »ENTER*. 

La introducción de la dirección final puede resolverla simplemente 
pulsando *RETURN* o *ENTER*. A continuación se suma S<18 a la 
dirección inicial introducida, que tiene como consecuencia el 
desensamblaje en la mayoría de los casos de "una pantalla 
completa". 


Obtendrán lo siguiente: 


BACB 

F3 


DI 


BACC 

D9 


EXX 


BACD 

59 


LD 

E,C 

BACE 

CB 

D3 

SET 

2,E 

BADO 

CB 

DB 

SET 

3,E 

BAD2 

ED 

59 

OUT 

(C) ,E 

BAD4 

D9 


EXX 


BAD5 

7E 


LD 

A,(HL) 

6AD6 

D9 


EXX 


BAD7 

ED 

49 

OUT 

(C),C 

BAD9 

D9 


EXX 


BADA 

FB 


El 


BADB 

C9 


RET 


BADC 

D9 


EXX 
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BADD 79 
BADE F6 OC 
BAEO ED 79 
BAE2 DD 7E 00 


LD A,C 
OR í(OC 
OUT (C),A 
LD A, (IX+0) 


Las direcciones del principio de cada linea en su caso serán 
di+erentes, si no utilizan el CRC 464. Los comandos traducidos son 
iguales en todos los ordenadores CRC. 

Esta rutina del sistema que acabamos de traducir, se utiliza para 
la lectura del RAM. El valor de la dirección HL del RAM se carga 
en el ACU independientemente del estado ROM/RAM. La rutina se 
llama a través del comando RST S<20. 

Si quiere continuar desensamblando introduzca ÍRETURN* (para 
desensamblador), IRETURN* para dirección inicial, lo que significa 
que se continúa a partir de la última dirección traducida, y 
IRETURN* para la dirección final, según el significado ya 
e>:puesta. 

De esta manera puede desensamblar fácilmente programas continuos. 
Veamos ahora otras funciones del programa: 

Al teclear "H" (HELP) obtendrán la lista de todos los comandos que 
ofrece este programa. 

Con "P" (FRINT) pueden activar/desactivar la impresora. El estado 
actual se señala en la esquina superior derecha. 

Con "B" se finaliza el programa. 


Otra función importante del desensamblador es "R" que representa 
el estado ROM/RAM. Introduzca ahora "R": 
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El "RAM" después de "le:" se representa en inverso, "lo:" 
signi-fica que nos re-ferimos al estado del Lower ROM, es decir las 
direcciones íiO a &3FFF. Pulsando la barra de espacio podemos 
llegar del estado RAM al ROM y viceversa. 

Si ha seleccionado el Lower ROM llegara pulsando *RETLJRNI al Hi- 
RAM (ííCOOO hasta &FFFF). La barra de espacio tiene en este caso la 
Tiisma ■función explicada anteriormente. 

También existe la posibilidad de activar alguno de los 252 ROM de 
expansión. Entre estos se encuentra por ejemplo el ROM de oiskette 
que tiene el nómero 7. Para seleccionar un ROM de expansión se 
debe introducir *CTRL-t-E*. 

A continuación puede introducirse el número deseado después de 
"hi:" por ejemplo 7 para el ROM de diskette. Queda eritonces 
seleccionado el ROM deseado para las direcciones ?(C000 a íxFFFF. 
Todas las restantes direcciones acceden al RAM. La ampliación del 
RSX, RDEEK que también puede "PEEKear" los RDMS se explica en el 
capítulo RSX. 

Otra -función relacionada directamente con el desensamblador es el 
generador de -fuentes. 

El generador de -fuentes, después de ser llamado con "S" genera un 
listado fuente de las direcciones indicadas, que se almacena a 
partir de línea 10000. Este programa fuente puede modificarse 
directamente a través del ensamblador. De esta manera tenemos un 
método simple para por ejemplo utilizar rutinas del sistema para 
programas propios sin necesidad de introducirlas nuevamente. Los 
programas fuente generados pueden modificarse más adelante para 
adaptarlos a las necesidades individuales. 

Hagamos una prueba: 

Seleccione con "R" etc. el Lower ROM. Saltee la pregunta "Definir 
nombre de label?" pulsando )|t,RETURN*. A continuación introduzca 
1D2 como dirección inicial y lEl como dirección final. 
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Finalice la ejecución con "B" y liste a continuación las lineas a 
partir de 10000. El programa -fuente generado puede almacenarse 
separadamente y utilizarse en el momento oportuno. 

Si la porción a desensamblar contiene direcciones conocidas, es 
decir a las cuales puede asignarse un label, puede hacerlo después 
de la pregunta "De-finir nombre del label:". 

La rutina S<BCCB se denomina -frecuentemente como "ROMWALK" dado que 
comprueba la distribución actual de memoria. Asignaremos ahora a 
la dirección !<BCCB el label ROMWALK. 

Seleccione el hi-RüM y llame al generador de -fuente. A 
continuación introduzca: 


ROMWALK, ?<BCCB 


Continúen con este procedimiento para de-finir otros labels, 
-finalizando la entrada con y *RETURN*. 

Introduzca ahora como dirección S(C006 a StCOOC y compruebe el 
resultado. 

La rutina que genera lineas BASIC desde el BASIC, como sucede con 
el generador de fuentes, se explica más adelante en este libro. 

Las funciones restantes del programa, se refieren todas al 
simulador paso a paso. 

EXPLICACION DEL SIMULADOR PASO A PASO 

Una de las dificultades en la programación con ensamblador 
consiste en que no existe una forma simple de comprobación de los 
programas confeccionados. Un error que en BASIC podría llevar a un 
“Syntax error", en ensamblador lleva en la mayoría de los casos a 
la caída del sistema. Por ello el tiempo de desarrollo de un 
programa es mucho mayor y la búsqueda de errores más difícil. 
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Para detectar un error en el programa seria de gran utilidad poder 
ejecutar el programa máquina, paso a paso comprobando cada vez que 
el contenido de los registros sea correcto. Sin este simulador 
deben realizarse estas comprobaciones manualmente. 

Las funciones de simulación del programa realizan esta pesada 
tarea automáticamente. Seleccione los ROMS, llame el programa 
simulador con “Z" e introduzca 1D7. 

SZ H PNC A B C D E H L IX lY 

00000000 00 0000 0000 0000 0000 0000 

SZ H PNC’ A’ B’C’ D’E’ H’L’ SP 

00000000 00 0000 0000 0000 9FF0 

01D7 23 INC HL 

En esta posición el indica que se espera una entrada. Están 
previstas las entradas siguientes: 

L espacio en blanco 

A 

E 

Pulsando la barra de espacio o la tecla RETURN, continiia la 
simulación. Se visualizan los contenidos de registros 
Bventualmente modificados y el comando siguiente. 

SZ H PNC A B C D E H L IX lY 

00000000 00 0000 0000 0000 0000 0000 

SZ H PNC’ A’ B’C’ D’E’ H’L’ SP 

00000000 00 0000 0000 0000 9FF0 

01D8 70 LD (HL),B 

La tecla A tiene una función importante: 

Pulsando la tecla A, el programa de simulación se altera a 
modalidad editor. De esta manera tiene la posibilidad de modificar 
los contenidos de registros y la dirección del programa. 
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Proceda entonces en el orden e>:acto que a continuación detallamos: 

Después de pulsar la tecla A, el cursor se encuentra debajo de la 
S (Sign Flag) de la última salida de registro. Los contenidos 
indicados en esta línea corresponden a los registros señalados. En 
esta línea pueden realizar modi-ficaciones introduciendo contenidos 
de registro en formato hexadecimal (indistintamente en mayúscula o 
minúscula) en las posiciones determinadas. La entrada para el 
registro flag, ha de ser naturalmente binaria, es decir con ceros 
y unos. Contenidos actuales pueden aceptarse con copy. Si copy no 
se desplaza introduzca previamente "Shi-f t+Cursor derecha" y 
"Shift+Cursor izquierda". Un comentario para la visualización: 

Al principio de la linea se encuentra el registro -flag como número 
binario. Sobre los bits individuales puede ver su significado: 

S - Sign Flag 
Z - Zero Flag 
H - Half overflow Flag 
P - P/V Parity/Overflow Flag 
N - BCD Subtraction Flag 
C - Carry Flag 

A continuación viene el acumulador A (8 bits) y los registros 
universales B hasta L, conjuntamente con registros de 16 bits, 
seguidos por los registros IX e lY. 

Se repite aquí el orden secuencial de los registros para el 

segundo set de registros. Al final de la línea se encuentra el 
apuntador del stack. 

El apuntador del stack o pila (SP) nunca debe contener direcciones 
menores a !<.... Su valor máximo es la dirección inicial de un 

programa máquina eventualmente cargado en el ordenador, es decir 
en la mayoría de los casos S<AOOO. Con valores menores que ?<.... el 
programa máquina, que realiza la simulación se sobrescribe, lo que 

lleva infaliblemente a la caída del sistema. Eventual mente debe 

modificarse el SP, lo que debe efectuarse únicamente al comienzo 
de una simulación, oorque de lo contrario se altera la secuencia 
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de las direcciones de retorno. Se debe repasar la línea íntegra 
mediante CÜPY o introducirla directamente. Si ha -finalizado una 
línea pulse ÜRETURN* para llegar a la siguiente línea. No utilice 
las teclas Cursor u otras teclas que pueden cargar en los 
registros valores no deseados. 

Después de terminadas las modificaciones de la linea anterior con 
iCRETURN*, el cursor se posiciona al comienzo de la línea que 
contiene el comando a traducir. En esta línea puede modificar 
ahora el PC, es decir los primeros cuatro números hexadecimales de 
la línea. La dirección introducida es la dirección de continuación 
de la simulación una vez pulsado ÍRETURN*. En caso de no desear la 
modificación de esta dirección, debe de todas formas aceptarse la 
misma mediante *COPYi|i. 

De esta forma finaliza la modalidad de edición iniciada mediante 
la tecla A y la simulación continúa. 

La última posibilidad de operación es la tecla E. 

La tecla E conmuta entre simulación real o pseudosimulación. 
Simulación real significa que todos los comandos se ejecutan 
realmente. En el caso de algunos comandos, este tipo de ejecución 
puede tener fatales consecuencias. Entre estos comandos 
"peligrosos" se encuentran todos aquellos que alteran realmente la 
configuración del sistema. Por ejemplo, los comandos que modifican 
los contenidos de memoria como LD (S<B1DB),A. Los contenidos de 
memoria asi modificados pueden alterar informaciones importantes 
utilizadas por el interpretador BASIC o por el sistema operativo, 
provocando errores insalvables. También los comandos I/O, que 
sirven entre otras cosas para la selección de ROM/RAM pueden 
llevar inmediatamente a la caída del sistema si se simulan en 
forma real. Atención asimismo con los comandos que se refieren 
directamente al SP. 

Por este motivo se proporciona la opción mediante la tecla E, de 
seleccionar la modalidad de simulación antes de ejecutar el 
comando. 
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En el extremo superior derecho de la pantalla se indica si la 
simulación es real o pseudosimulación. 

Veamos el ejemplo de la simulación de la rutina TEST HL-DE a 
partir de la dirección ROM t-(FP. Seleccione el HI-RÜM y active la 
simulación real. LLame el simulador mediante 7 e introduzca 
!<D232 (664: ?<D282/612B! SiD282) como dirección inicial. Compare su 
resultado con el listado que ofrecemos a continuación. Excepto las 
direcciones de bifurcación y las direcciones de los comandos, su 
pantalla debería coincidir con lo expuesto abajo (en el caso del 
464 la coincidencia debe ser total!). 


SZ H PNC A e C DE 

eeaaeflie 0 í 0000 0000 

D232 11 4F 00 LO 
SZ-H PNC A B C DE 


H L n lY SZ H PNC' 

0000 0000 0000 00000000 
DE,D004F 

H L ü IV SZ H PNC 


A' B'C D'E' H'C SP 

00 0000 0000 0000 9FF0 

A' B'C D'E' H'C SP 


D235 CD BB FF CALL IFFB8 

SZ H PNC A B C D E H L ü lY SZ H PNC A' B'C D'E' H'C SP 

00000000 00 0000 004F 0000 0000 0000 00000000 00 0000 0000 0000 9FEE 
FFB8 7C LD A,H 

SZ H PNC A B C D E H L IX lY SZ H PNC A' B'C D'E' H'C SP 

00000000 00 0000 004F 0000 0000 0000 00000000 00 0000 0000 0000 9FEE 
FFB9 92 SUB D 

SZ H PNC A B C D E H L IX lY SZ H PNC A' B'C D'E' H'C SP 

01000010 00 0000 004F 0000 0000 0000 00000000 00 0000 0000 0000 9FEE 

FFBA C0 RET NZ 

SZ H PNC A B C D E H L IX lY SZ H PNC A' B'C D E' H'C SP 

01000010 00 0000 004F 0000 0000 0000 00000000 00 0080 0000 0000 9FEE 
FFBB 7D LD A,L 

SZ H PNC A B C D E H L IX lY SZ H PNC A' B'C D'E' H'C SP 

01000010 00 0000 004F 0000 8000 8000 00000000 00 0000 0000 0000 9FEE 
FFBC 93 SUB E 

SZ H PNC A B C D E H L IX lY SZ H PNC A' B'C D'E' H'C SP 

10110011 B1 0000 004F 0000 0000 0000 00000000 00 0000 0000 0000 9FEE 
FFBD C9 RET 

SZ H PNC A B C D E H L IX lY SZ H PNC A' B'C D'E' H'C SP 

10110011 DI 0000 004F 0000 0000 0000 00000000 00 0000 0000 0000 9FF0 
D238 D2 AB CE JP NC.IrCEAB 
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En primer lugar DE se carga con Si004F. Observe la modi-ficaciñn de 
lo expuesto debajo de DE. A ccr.tinuaci ón verán la llamada de la 
rutina TEST HL-DE. Después de este comando se cecrementa SP, 
porque se ha almacenado la dirección de retorno en la pila. La 
rutina realica le sustracción HL-DE. Como era de esperar se activa 
el carry -flag ( = 1) en el momento del retorno, indicando que DE es 
mayor que HL. 

Pruebe usted la misma simulación a partir de la dirección inicial. 
Cargue previamente HL y DE con valores diterentes (S<H101, Í.HIOOO, 
!<H80) y Observe la influencia en los flags. £1 comande RET o RETMZ 
finaliza la rutina. La dirección de retorno se extrae de la pila y 
continúa la ejecución del programa con el comando siguiente 
después de RST 5.:H20. 

Si tiene dudas en programas o comandos utilice el simulador para 
comprobar su procedimiento. 


DESCRIPCION DEL PROBRAMA 


Antes de la explicación sistemática del programa, aclararemos 
algunas cosas aun del funcionamiento del simulador. 


El núcleo del simulador consiste en un programa máquina que se 
carga al final del programa. Se puede decir que POKEAMOS el 
comando a ejecutar al centro de este programa. Previamente se 
cargan los registros con los valores correspondientes. Después de 
la ejecución del comando, los contenidos de registros 
eventual mente alterados se almacenan en la memoria para 
traspasarlos al BASIC. El simulador llama a este programa, 
mediante CALL Sí 9700 en la linea 1140. Para que se comprenda mejor, 
ofrecemos el listado en ensamblador del programa máquina. 


Reflexione sobre el funcionamiento del programa observando este 
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listadc. Si desea simularlo na de desactivar la simulación real de 
los comandas que alteran el SP y realizar las modificaciones 
mediante "A". Para mantener breve el programa, no almacenamos los 
contenidos de registros en la memoria mediante comandos LD, los 
grabamos y leemos mediante comandos PUSH y POP. Para ello 
inicializamoE el SP con el inicio del área reservada para la 
transferencia (SPUELO-SP traspaso dirección Low). 

Con la ayuda de este método pueden ejecutarse todos los comandos 
excepto los comandos de bifurcación, que nos llevan fuera del 
programa máquina haciendo imposible el retorno al BASIC. 

Dado que el segundo set de registros del 280-A del CPC se reserva 
para rutinas del sistema, almacenamos el contenido del mismo antes 
del programa mediante PUSH y lo extraemos al final mediante POP. 

La modificación del segundo set original de registros mediante 
programas propios puede llevar a la caída del sistema. El 
siguiente listado se ha confeccionado con el CPC 6128 y las 
modificaciones para el 464 y el 664 se hallan indicadas en el 
programa. 
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AOOO 

10 


9F70 

20 

ORG 

9F70 F3 

30 

DI 

9F71 D9 

40 

EXX 

9F72 OS 

50 

EX 

9F73 F5 

60 

PUSH 

9F74 C5 

70 

PUSH 

9F75 D5 

80 

PUSH 

9F76 E5 

90 

PUSH 

9F77 08 

100 

EX 

9F78 D9 

lio 

EXX 

9F79 ED730000 

120 

LD 

9F7D 310000 

130 

LD 

9F80 F1 

140 

POP 

9F81 C1 

150 

POP 

9F82 DI 

160 

POP 

9F83 El 

170 

POP 

9F84 D9 

180 

EXX 

9F85 08 

190 

EX 

9F86 DDEl 

200 

POP 

9F88 FDEl 

210 

POP 

9F8A F1 

220 

POP 

9F8B C1 

230 

POP 

9F8C DI 

240 

POP 

9F8D El 

250 

POP 

9F8E ED7B0000 

260 

LD 


; Simulador 
?<9F70 

; Desactivar interrupt 
; Uso del 2do set registros 
at, a-f’ 

a-f ; Salvar segundo set registros 
be ; en la pila (STACK) 
de ; antes de la utilización 
hl 

af,aF’ 

(Spreal),sp ; Salvar SP real 
sp,spuelo ; SP trasp. reg. 
af 

be ; Leer registro 

de 

hl 

at,a-f’ 

ix 

iy 

a-f 

be 

de 

hl 

sp,(spsimu) ; Carga SP simul. 
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9F92 0000 

270 BEFEHL 

DW 

9F94 0000 

280 

Dt>J 

9F96 ED730000 

290 

LD 

9F9A 310000 

300 

LD 

9F9D E5 

310 

PUSH 

9F9E D5 

320 

PUSH 

9F9F C5 

330 

PUSH 

9FA0 F5 

340 

PUSH 

9FA1 FDE5 

350 

PUSH 

9FA3 DDE5 

360 

PUSH 

9FA5 08 

370 

EX 

9FA6 D9 

380 

EXX 

9FA7 E5 

390 

PUSH 

9FA8 D5 

400 

PUSH 

9FA9 C5 

410 

PUSH 

9FAA F5 

420 

PUSH 

9FAB ED7B0000 

430 

LD 

9FAF D9 

440 

EXX 

9FB0 08 

450 

EX 

9FB1 El 

460 

POP 

9FB2 DI 

470 

POP 

9FB3 C1 

480 

POP 

9FB4 F1 

490 

POP 

9FB5 08 

500 

EX 

9FB6 D9 

510 

EXX 

9FB7 FB 

520 

El 

9FB8 C9 

530 

RET 


O ; Reservar espacio 
O ; para comando 
(spsimu),sp ; Almac. Spsimu 
sp.spsimu ; para trasp. reg 
hl 

de ; RegraPa registro 

be 

a-f 

ly 

ix 

a-f, a-f ’ 

hl 

de 

be 

at 

sp,(spreal) ; Recup. SP real 

af,af-' ; Cargar segundo set 
hl ; de registros con 
de ; valores iniciales 
be 
a-f 

at,at’ 

; Liberar interrupt 
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t*** Linea 

120 

: SPREAL=?<9FB9 

Linea 

430 

: SPREAL=!<9FB9; Liberar interrupt 

9FB9 

540 

SPREAL DS 2 

Linea 

130 

: SPUEL0=!^9FBB 

9FBB 

55 

SPUELO DS 20 

; Espacio para 

trans+erencia de registros 

**** Linea 

260 

; SPSIMU=Si9FCF 

*1** Linea 

290 

; SPSIMU=?<9FCF 

**** Linea 

300 

: SPSIMU=S<9FCF 

9FCF 0000 

560 

SPSIMU DW pila 

; Espacio para 

SP de simulación 

9FD1 

570 

DS 4 

; Espacio para 

desbordamiento pila 

**** Linea 

560 

: PILA=!(9FD5 

9FD5 

580 

PILA DS 50 

; Espacio para 

pila 

de simulación 

Programa : Simula 
Start : ?<9F70 

End : !<A006 


Longitud : 0097 
0 Errores 

Tabla de variables: 

BEFEHL 9F92 SPREAL 9FB9 
PILA 9FD5 


SPUELO 9FBB 


SPSIMU 9FCF 
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10 ’ZSO - Desensamoladcr, Simulador / Generador de fuente 

20 ’ de H.D. 02/10/1935 
30 MEMORY 8<9EFF 
40 MODE 2 

50 GOSUB 27Ó>0:REM Init 
60 REM ENTRADA 

70 PRINT pri:»;LOCOTE #3,1,VP03(#0);PRINT#3,; 

80 CLS#1:PRINT#1."Modalidad de ENTRADA" 

90 a*=INKEY*:lF a*="" THEN 90 
100 IF a:>=CHR*<13) THEN 120 

110 FOR me=0 TO bean: IF (ASC (aí) OR ?<20) < > < ABC (menuS (me) > OR 8<2 

0) THEN NEXTrGOTO 70 

120 CLS#1:PRINT#1,menu*(me);:CLS#3 

130 PRINT LEFT*(menu*<me) , 1) ; 

140 ON me+1 GOSUB 380,1600,1510,510,630,580,1260,210,250,190 
150 IF NOT zflag THEN ztlag=0 ELSE zflag=l 
160 GOTO 70 
170 

180 REM end 
190 MODE 2:END 

200 ' ««-»«««**««««««««*««**«*««*«•««»*•»*««* 

210 REM Impresora activada/desactivada 

220 IF aus=0 THEN PEN #2,0:PAPER #2,1:aus=8:PRINT#2,"an E 

LSE PEN #2,1:PAPER #2,0:aus=0:PRINT#2,"aus"; 

230 BOBUB 460:RETURN 

240 ************************************** 

250 REM rom/ram Status 

260 GOSUB 460:PEN #4,0:PAPER #4,1 

270 LOCATE #4,1 ,1: E'RI NT #4, r omstatí (1 ostat) ; 

280 aí=INKEYÍ:: IF aí="" THEN 280 

290 IF a*=CHRí(13) THEN PEN #4,1;PAPER #4,0:LOCATE #4,1,1;PR 
INT #4,romstatí: (lostat); ELSE 105tat = 1-1ostat;GOTO 270 
300 PEN #5,0:PAPER #5,1;IF hÍEtat=2 THEN histat=l 
310 LOCATE #5,1,1;PRINT #5,romstatí(histat) ; 
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320 a*=INKEY*!lF a*="" THEN 320 

330 IF aí=CHRí:(13) THEN PEN #5,1: PAPER #5,0: LOCATE #4,1,1:PR 
INT #5,rDmstat'í (histat) ; : GOTO 350 

340 IF a*<>CHR*(5) THEN histat=l-histat:GOTO 310 ELSE PEN #5 

,1:PAPER #5,0:CLS #5:INPUT #5,;,exrom:histat=2 

350 IF histat=2 THEN status=exrom ELSE status=252+lostat+his 

tat*2 

360 RETURN 

370 *************************************** 

380 REM Help 
390 CLS 

400 LOCATE 10,2;PRINT"Z 80 - DISASSEMBLER + 

S I M U L A T O R" 

410 LOCATE 1,5:F0R i=0 TO bean:LOCATE 15,VFOS(#0) 

420 PRINT LEFT* (menú* (i ) , 1) ; " / " ; CHRÍ (ASC (menú* (i ) ) OR S<20) 

;" — ";menú*(i) 

430 NEXT 
440 RETURN 

460 REM sub z-flag 

470 LOCATE 1,VPOS(#0):PRINT " ";CHR*(8); 

480 IF zflag=l THEN zTlag=-l 
490 RETURN 

500 *********************************** 

510 REM Simulator 

520 GOBUB 1790:IF noflag THEN pc=pc ELSE pc=a 
530 z-flag=-l: PRINT: GOTO 1140 

540 FOR i=adrbef TO adrbe-f+3: POKE i ,0: NEXT: qq=0 
550 GOSUB 1880: REM DeSBnsaiHD 1 ar 
560 RETURN 

570 *«**********«*««•«**********«*«««** 

580 REM Siínuiador Realein/aus 
590 echtsim=-l-echtsim _ 

600 IF echtsim THEN PEN#6,0;PAPER #6,1;PRINT#6,"an 


ELSE P 
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EN #6,1:PAPER #6,0:PRINT#6,“aus"; 

610 GOSUB 460:RETURN 

620 ' *********************************** 

630 REM Espac.o en blanco = Simular 

640 IF ABS(z-flag)<>l THEN PRINT ..^1 primero Sl.tulaCnr 

con Z‘‘!RETurn 

650 GOSUB 460 

660 IF NOT echtsim THEN 1140 

670 IF po=0 THEN befí=prí:GOTO 690 

680 be-f»=LEFTí (LEFTÍ (prí ,po-l)+” ",4) 

690 REM Tratar de torma especial les comandos de biíurcacion 
700 IF beTC="JP " OR be-f*="JR " THEN GOSUB 970: GOTO 1140 
710 IF beíí<>"RBT " THEN 730 

720 spradr=pc-dwtlag:pc=VAL(MIDÍ(pr»,5,4)) iGOTO 790 
730 IF beT»<>"DJNZ" THEN 770 

740 b=PEEK(adrreg+15):b=b-l-256*(b=0):POKE adrreg+15,b 
750 IF b<>0 THEN GOSUB 1050 
760 GOTO 1140 

770 IF bef*<>”CALL" THEN 860 
780 spradr=pc:GOSUB 970 

790 REM ftiiT.acenar dirección retorno en Stack (pila) 

800 sp=PEEK(stapel)+256*PEEK(stapel+1) 

810 sp=sp—l:POKE sp,INT(spradr/256)-256*(spradr<0) 

820 sp=5p-l:POKE sp,spradr-256*INT(spradr/256) 

830 POKE stapel,sp-INT(sp/256)*256 
840 POKE stapel+1,INT(sp/256)-256*(sp<0) 

850 GOTO 1140 

860 IF LEFTÍ(beí#,3)<>"RET" THEN 1130 

870 GOSUB 1060 

880 IF bedflg=0 THEN 1140 

890 REM Extraer dirección retorno del Stack (pila) 

900 sp=PEEK(stapel)+256*PEEK(stapel+1) 

910 pe=PEEK(sp+1)*256+PEEK(sp) 

920 5p=sp+2 
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930 POKE stapel,sp-INT(sp/256)*256 
940 POKE stapel+1,INT(sp/256)-256*<sp<0) 

950 BOTO 1140 

970 REM Súb pe activo en bi-furcacicnes 

980 GOSUB 1060 

990 IF bedílg THEN 1050 

1000 IF bedTlg=0 THEN RETURN 

1010 aí=MIDá<pr*,po+2,2) 

1020 IF a#="HL" THEN pc=PEEK(adrreg+18)+256*PEEK(adrreg+19): 
RETURN 

1030 IF a$="IX" THEN pc=F'EEK<adrreg+B)+256*PEEK(adrreg+9);RE 
TURN 

1040 IF aí="IY" THEN pc=PEEK(adrreg+10)+256*PEEK(adrreg+1 1 ): 
RETURN 

1050 pc=VAL(RIGHTÍ(prí,5)):RETURN 
1060 REM Sub test condición 
1070 aí=MIDÍ(pr*,po+l,2) 

1080 FOR i=0 TO 7: IF aáOcondtli) THEN NEXT 

1090 IF i =8 THEN bed-f 1 g=l: RETURN 

1100 bit=((i\2)*2-<i>3)-<(i=4)0R<i=5))) 

1110 IF (PEEK(adrreg+12)AND 2'bit)/2'bit=-(i MOD 2 =1) THEN 
bedflg=-l ELSE bedTlg=0 
1120 RETURN 

1130 IF echtsim THEN CALL !<9F70 : REM Ejecutar comando, 

1140 REM Visualioá!" registros 

1150 PRINT#aus,"SZ H PNC A BC DE HL IX lY SZHP 
NC A’ B’C DE- H'L' SP " 

1160 FOR q=l TO 0 STEP -1 

1170 PRINTttaus,BIN*(PEEK(adrreg+q*12>,8);" ";HEXí: (PEEK(adrr 

eg+l+q*12),2);" 

1180 FOR k=2 TO 6 STEP 2:pore=q*12+k:GOSUB 1220:NEXT 

1190 IF q=l THEN pore=B:GOSUB 1220:pore=10:GOSUB 1220 ELSE p 

DrB=20: GOSUB 1220 
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1200 NEXT:PRINTttaus 
1210 GOTO 540 

1220 REM Salida registro ü-Dits 

1230 PRINT#aus, HEXÍ < 25é>*F'EEK < adrr eg+por e+1) +PEEK (adr reg+pore 
1240 RETURN 

1250 ■ *****************•»**■»*»*****-»*»**** 

1260 REM Mcdiíicar registros 

1270 IF ABS( 2 f 1 ag)<> 1 THEN PR1 NT" ‘LLsínar pri/Tiero al simulador 
con Z": RETURN 
1280 GOSUB 460 
1290 LOCATE l,VPOS<#0)-2 
1300 LINE INPUT "",zt 

1310 q=i2:GOSUB 1400 ; REM Primer set de registros 
1320 q=0.1!po=29:GOSUB 1450 : REM IX 
1330 po=34;GOSUB 1450 : REM lY 

1340 q=0:GOSUB 1400 : REM Segundo set de registros 
1350 q=-4;po=67:GOSUB 1450 
1360 LINE INPUT "",z* 

1370 pc=VAL("!<"+LEFTÍ (zí,4) ) 

1380 RETURN 

1400 REM Sub transferencia registros modificados al Mapro 
1410 POKE adrreg + l+q, VAL("8<’'+MIDÍ (zí, 1 l-(q=0)*38,2) ) 

1420 POKE adrreg+q,VAL("S!X"+MIDÍ(z*,l-(q=0)*38,B)) 

1430 FOR po=14 TO 24 STEP 5:G0SUB 1450:NEXT 
1440 RETURN 

1450 REM Sub determinar valores de registros 
1460 wert=VAL("S<"+MIDí (zí:,po-(q=0)*38,4) ) 

1470 POKE adrreg+q+(po\5)*2-1,INT(wert/256)-256*(wert<0) 

1480 POKE adrreg+q+(po\5)*2-2,wert-INT(wGrt/256)*256 
1490 RETURN 

1500 ' *********************************** 
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1510 REM Generador fuentes Zao 
1520 Bou-flag^—1 
1530 PRINT 

1540 PRINT "“S'^inicicn noíTiDre laoel;" 

1550 FDR i=0 TO 50: INPUT 1 aiá (i > , wa:á ( i ) : IF laí(i)='‘" THEN PRI 
NT;GOTO 1580 

15¿>0 zí=STRT(zeinol+CHRÍ(32)+CHRÍ <39)+CHRÍ(32)+1aí(i )+" EDO 
" +wai ( i ) +CHR* (0) +CHR4: < 0) 

1570 CALL mst,ezí:zeinD=zeino+10:NEXT 
1580 fna;;lab = i—1 

1590 ' *********************************** 

1600 REM Desen sáíiiDl ador 

1610 IF me= 1 THEN 50ijif 1 ag=0: maxiab=0 

1620 GOSUB 1790:IF noflag THEN pc=pc ELSE pc=a 

1630 GOSUB 1790: ende=a: IF noflag THEN ende=pc+S<18 

1640 PRINT 

1650 IF NOT souflag THEN 1720 

1660 zT=STR*(zeino)+CHRT(32)+CHRÍ(39)+CHRÍ(32)+";"+CHR*(0)+C 
HRí(0) 

1670 CALL mst,@zí 
1680 zei no= 2 eino+10 
1690 zí="" 

1700 z:í=STRÍ: (zeino) +CHRÍ (32)+CHRÍ: (39) +CHRJ: (32) 

1710 FOR i=0 TO inaxlab:IF pc=VAL(wa#(i)) THEN z*=zT+laT(i)+" 
" ELSE NEXT 
1720 GOSUB 1880 
1730 IF NOT souflag THEN 1760 
1740 z í=z *+pr*+CHR*(0)+CHRÍ(0) 

1750 CALL mst,@zí 

1760 IF pc>ende THEN RETURN 

1770 IF souflag THEN 1680 ELSE 1720 

1790 REM Sub entrada dirección hexadecimal 
1800 x=PQS(#0)+l;y=VPaS(#0) 
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1810 LOCATE ;( ,y: INPUT"S<" ,aí 

1820 IF 3*="" THEN no-f 1 ag=-1; GOTO 1850 

1830 nD-flag=0 

1840 a=VAL ('■«<"+3*) 

1850 LOCATE X+5,y 
1860 RETURN 

1880 REM sub disassi 
1890 adr=pc 

1900 PRINT#aus,HEX*(adr,4);" 

1910 i'flag=0 

1920 GOSUB 2690 

1930 GOSUB 2040 

1940 IF i-flag THEN 2350 

1950 IF w=S<CF OR w=S<D7 OR w=*<DF OR w=8<EF THEN pr*=pr*+" /DW; 

nn":dwtlag=2 ELSE dwflag=0 

1960 IF INSTR(pr*,"n‘')<>0 THEN 2460 

1970 IF INSTR(pr*,"e")<>0 THEN 2600 

1980 po=INSTR(pr^," ") 

1990 IF PRÍ="" THEN PRÍ="???" 

2000 IF po=0 THEN PRINT#aus,TAB(21) ;prí; :GOTO 2020 

2010 PRINT#aus,TAB(21)¡LEFT*(pr:í,po-l) ;TAB<27>;RIGHT*(pr*,LE 

N(pr$)-po); 

2020 PRINT#au5 
2030 RETURN 

2040 REM Interpretar 

2050 IF (w=8<DD OR w=?íFD) AND NQT iflag THEN 2240 
2060 IF w=8<ED THEN 2210 
2070 IF w=g<CB THEN 2150 
2080 GOSUB 2290 

2090 ON col GOTO 2110,2130,2100 
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2100 pr«=bef$(w):RETURN 

2110 IF w=&76 THEN pr*="HALT":RETURN 

2120 pr»="LD •■+regtab*(co2)+","+reqí::RETURN 

2130 IF co2=0 GR co2=l OR co2=3 THEN a*=" A," ELSE a*=" " 

2140 pr#=ari)og*(co2)+a*+reg*:RETURN 

2150 REM cb 

21¿0 GCSUB J2690 

2170 IF iflag THEN dis=w:GaSUB 2690 
2180 GOSUB 2290 

2190 IF col=0 THEN pr í=rotschi í (co2) +" ''+regT ELSE prí:=bitti 
í (col) +STRÍ (co2) + " , '’+reg* 

2200 RETURN 
2210 REM ed 
2220 GOSUB 2690 

2230 IF w<í<40 OR w>«<BF THEN pr#="?'>!?”: RETURN ELSE GOTO 2100 
2240 REM xy 
2250 iflag=-l 

2260 IF w=í<DD THEN i*="IX” ELSE it="IY" 

2270 GOSUB 2690 

2280 GOTO 2040 

2290 descomponer codigo 

2300 co1 = (m and S<X1 1000000)/64 

2310 co2=(m and S<X111000)/a 

2320 co3=m and giXlll 

2330 reg#=regtab*(co3) 

2340 RETURN 

2350 I F.EM indexado 

2360 po=INSTR<pr*,"HL") 

2370 IF po=0 THEN pr*=''???"; GOTO 1980 
2380 IF INSTR(pr»,"(HL)'‘)<>0 THEN 2420 
2390 IF pr*="EX DE,HL" THEN pr*=‘'???": GOTO 1980 
2400 IF pr»="ADD HL,HL" THEN pr»="ADD "+i»+","+ií:GOTO 1980 
2410 pr#=LEFT»(prí,po-l)+i*+RIGHT*(pr*,LEN(pr*)-po-l):GOTO 1 
950 
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2420 IF LEFT*(prí,2)="JP'‘ THEN 2410 
2430 IF pc-adr<3 THEN GOSUB 2¿i90;dis=w 

2440 IF dis>127 THEN dis*=STRí: (di s-256) ELSE di 5f=" + "+RIBHTÍ: 
(STR^(dis),LEN<STRÍ(dis))-l) 

2450 ií=i*+dis:íiGDTO 2410 
24é.0 REM Reemplazar n 
2470 pD=INSTR(prí,"nn") 

2480 IF PD<>0 THEN 2530 
2490 po=INSTR(pr«, "n") 

2500 GOSUB 2690 

2510 prí=LEFTí: (prí ,po-l) +"?<"+HEXÍ (w,2) +RIGHTÍ (pr*,LEN (pr*) -p 
o) 

2520 GOTO 1980 
2530 GOSUB 2690!lb=w 
2540 GOSUB 2690 
2550 wert=w*256+lb 

2560 FOR i=0 TO maxlabrlF UNT(wert)=VAL(waí(i)) THEN pr*=LEF 
T#(prí,po-1)+1 ai(i)+RIGHTi(pri,LEN <pri)-po-1)iGOTO 1980 
2570 NEXT 

2580 prÍ=LEFTÍ(prÍ,po-l)+"?<"+HEXÍ(wert,4)+RIGHTÍ(prÍ,LEN(prÍ 
)-po-1) 

2590 GOTO 1980 

2600 REM Reemplazar e 

2610 po=INSTR(pri,"e") 

2620 GOSUB 2690 

2630 IF w>127 THEN w=w-256tREM 2er-Komp. 

2640 w=w+2 

2650 at="Í"+STRÍ (w)+■■ >" + "8<"+HEXÍ (pc+w-2,4) 

2660 FOR i=0 TO maxlabiIF UNT (pe ♦■w-2> =VAL (wai (i ) ) THEN ai=la 
i(i) ELSE NEXT 

2670 prÍ=LEFTÍ(prÍ,po-l)+aÍ+RIGHTÍ(pr*,LEN(pri)-po) 

2680 GOTO 1980 

2690 REM Leer byte 

2700 !RPEEK,@wX,pe,status: w=wX 
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2710 pc=pc+l 

2720 IF fiBS(zflag)=l THEN POKE adrbe-f+qq , w: qq=qq+1 
2730 PRINT#aus,HEXÍ(w,2);" ”; 

2740 RETIJRN 

2750 ' ************************************* 

2760 REM init 

2770 romstatí (1) ="RAM": r omstatá (0) =''ROM'' 

2780 statLis=255:w7.=0 

2790 adrreg=?<9FBB:adrbe-f=?<9F92:5tapel=?.9FCF: ' 52=PRINT PRINT 
PRINT 

2800 POKE stapel ,8<F0:POKE stapel + 1,8<9F 
2810 DIM la$(50),Ma$(50) 

2820 zeino=10000 

2830 LOCATE l,l;PRINT"lo : RAM hi : RAM";:1ostat=l:histat= 

1 

2840 LOCATE 68,1:PRINT"Impresora desactivada" 

2850 LOCATE 61,2:PRiNT-cj¿,cion real desactivada" 

2860 WINDOM #0,3,80,3,22 
2870 WINDOW #1,30,66,1,1 
2BB0 WINDOW #2,76,78,1,1 
2890 WINDOW #3,1,2,3,22 

2900 WINDOW #4,6,9,1,l;WINDOW #5,17,20,1,1 

2910 WINDOW #6,76,78,2,2 

2920 pr i í=CHRT (10) +CHRÍ (11) +CHR4: (11) 

2930 au5=0 

2940 READ beanrFOR i=0 TO beantREAD menuí(i):NEXT 
2950 GOSUB 380 

2960 DIM cond*(7),regtabí(7) ,rDtschi»(8) ,bittií(3),arilogí(7 
),beí»(255) 

2970 FOR i=0 TO 7:READ condí(i):NEXT 
2980 FOR i=0 TO 7: READ regtab:» (i ) : NEXT 
2990 FOR i=0 TO 7;READ rotschií(i):NEXT 
3000 FOR i=l TO 3;READ bitti*(i):NEXT 
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3010 FOR i=0 TO 7:READ ari1ogí(i);NEXT 
3020 FOR i=0 TO &7F:READ bef*(i):NEXT 
3030 FOR i=!<B0 TO ?<9F: beTÍ (i ) : NEXT 

3040 FOR i=8<A0 TO !<FF:READ beTÍ(i);NEXT 
3050 mst=S<9F00 

3060 FOR i=mst TO mst+!< 19: READ aí: w=VAL ( "S<"+aí:) 

3070 s=s+w:POKE i,w:NEXT 

3080 IF 5<> 4273 THEN PRINT"Error en DATAS 1" -•end ELSE s --=0 

3081 ■ 464: it sO 4121 then .... 

3082 ' 664: i-f s<> 4288 then .... 

3090 FOR i=S<9F20 TO 8<9F6C 

3100 READ aí:w='viAL("!<H"+a*) 

3110 s=s+w:POKE i,w;NEXT 

3120 IF s<> 9278 THEN PRINT"Error en DATAS 2" ¡end elbe s=0 

3121 ■ 464; it s<> 9405 then .... 

3122 ■ 664: if s<> 9341 then _ 

3130 CALL 8<9F20: REM Incorporar nSX 
3140 FOR i=8/9F70 TO S<9FB8 

3150 READ a*; w=VAL ( "S<H"+a*) 

3160 s=s+w:POKE i,w:NEXT 

3170 IF 5<> 12811 THEN PRlNT"ErrDr en DATAS 3" ¡end 
3180 RETURN 

3190 REM DATAS ++++++++++++++*++++++ 

3200 DATA 9 

3210 DATA Help, Disassempler,Beneradar -fuente,Simulador Z-SO 
3220 DATA " (Barra espaci-os)=Comando simular". Simulación 
real, Alteración contenido re-jistros 

3230 DATA Impresora activaaa'de5activada,RQM/RAM Status, Hasta 
pronto!! 

3240 DATA NO, "C,",PO,PE,NZ,"Z,","P,","M," 

3250 DATA B,C,D,E,H,L,(HL) , A 

3260 DATA RLC,RRC,RL,RR,SLA,SRA,???,SRL 

3270 DATA BIT,RES,SET 

3280 DATA ADD,ADC,SUB,SBC,AND,XOR,OR,CP 

3290 DATA NOP,"LD BC,nn","LD (BC),A",INC BC,INC B,DEC B,"LD 
B,n"yRLCA 
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3300 DATA "EX AF,AF’","ADD HL,BC","LD A,(BC)",DEC BC,INC C,D 
EC C,"LD C,n",RRCA 

3310 DATA DJNZ e,"LD DE,nn","LD (DE),A",INC DE,INC D,DEC D," 
LD D,n",RLA 

3320 DATA JR e,"ADD HL,DE","LD A,(DE)",DEC DE,INC E,DEC E,"L 
D E,n",RRA 

3330 DATA "JR NZ,e","LD HL,nn","LD (nn),HL",INC HL,INC H,DEC 
H,"LD H,n",DAA 

3340 DATA "JR Z,e","ADD HL,HL","LD HL,(nn)",DEC HL,INC H,DEC 
H,"LD L,n",CPL 

3350 DATA "JR NC,e","LD BP,nn","LD (nn),A",INC SP,INC (HL),D 
EC (HL),"LD (HL),n",SCF 

3360 DATA "JR C,e","ADD HL,SP","LD A,(nn)",DEC BP,INC A,DEC 
A,"LD A,n",CCF 

3370 DATA "IN B,(C)","OUT (C),B","BBC HL,BC","LD (nn),BC",NE 
G,RETN,IM 0,"LD I,A" 

3380 DATA "IN C,(C)","OUT (C),C","ADC HL,BC","LD BC,(nn)",,R 
ETI,,"LD R,A" 

3390 DATA "IN D,(C)","OUT (C),D","SBC. HL,DE","LD (nn),DE",,, 
IM 1,"LD A,I" 

3400 DATA "IN E,(C)","OUT (C),E","ADC HL,DE","LD DE,(nn)",,, 
IM 2,"LD A,R" 

3410 DATA "IN H,(C)","OUT (C),H","BBC HL,HL","LD (nn),HL",,, 
,RRD 

3420 DATA "IN L,(C)","OUT (C),L","ADC HL,HL","LD HL,(nn)",,, 
,RLD 

3430 DATA ,,"BBC HL,SP","LD (nn),SP",,,, 

3440 DATA "IN A,(C)","OUT (C),A","ADC HL,BP","LD BP,(nn)",,, 

» 

3450 DATA LDI ,CPI, INI ,DUTI , , , , ,LDD,CPD, IND,OUTD, , , , 

3460 DATA LDIR,CPIR,INIR,OTIR,,,,,LDDR,CPDR,INDR,OTDR,,,, 
3470 DATA RET NZ,PQP BC,"JP NZ,nn",JP nn,"CALL NZ,nn”,PUBH B 
C,"ADD A,n",RST 8<00 
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3480 DATA RET Z,RET,"JP Z,nn",,"CALL Z,nn",CALL nn,"ADC A, 
n",RST 8i08 

3490 DATA RET NC,POP DE,‘'JP NC,nn","OUT (n) , A" , "CALL NC,nn'‘, 
PUSH DE,"SUB n",RST &10 

3500 DATA RET C,EXX,"JP C,nn",”IN A,(n>","CALL C,nn",,"SBC 
A,n",RST ?<18 

3510 DATA RET PO,POP HL,"JP PO,nn","EX (SP),HL","CALL PO,nn" 
,PUSH HL,"AND n",RST .t'20 

3520 DATA RET PE,JP (HL),"JP PE,nn","EX DE,HL","CALL PE,nn", 
->,"XOR n",RST «<28 

3530 DATA RET P,POP AF,"JP P,nn",DI,"CALL P,nn",PUSH AF,"OR 
n",RST «<30 

3540 DATA RET M,"LD SP,HL","JP M,nn",El,"CALL M,nn",->,"CP n 
",RST S<3B 

3550 DATA DF,04,9Í,C9,07,9T,FD,EB 

3560 DATA 23,5E,23,56,EB,CD,4d,de 

3561 •464;..,.,61,dd 

3562 ' 66452,de 

3570 DATA B7,C8,CD,c+,EE,D0,CD,a5 

3571 ' 464:..,..,..,04,ee,..,..,c6 

3572 ' 664:d4,eeaa 

3580 DATA E7,C9 

3581 ■464:e6,.. 

3582 '664!e7,. 

3590 DATA 01,2F,9F,21,3A,9F,CD,DI 
3600 DATA BC,3E,C9,32,20,9F,C9,34 
3610 DATA 9F,C3,3E,9F,52,50,45,45 
3620 DATA tB, 00,00,00,00,00, DF, 42 
3630 DATA 9F, C9,45,9F, FD ,FE, 03, C2 

3640 DATA 55,D0,7A,FE,00,C2,ID,C2 

3641 '464:ed,cíId,c2 

3642 '664:58,d0.,S0,cb 
3650 DATA 7B, 32,6A, 9F, DD, 6E, 02 ,DD 
3660 DATA 66,03,DF,68,9F,DD,6E,04 
3670 DATA DD,66,05,77,97,23,77,C9 
3680 DATA 6B,9F,FD,7E,C9 
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3690 DATA F3,D9,08,F5,C5,D5,E5,0B 
3700 DATA D9,ED,73,B9,9F,31 ,BEi,9F 
3710 DATA F1,C1,D1,E1,D9,0B,DD,E1 
3720 DATA FD,E1,F1,C1,DI,El,ED,7B 
3730 DATA CF,9F,00,00,00,00,ED,73 
3740 DATA CF,9F,31,CF,9F,E5,D5,C5 
3750 DATA F5,FD,E5,DD,E5,0B,D9,E5 
3760 DATA D5,C5,F5,ED,7B,B9,9F,D9 
3770 DATA 08,E1,DI,C1,F1,0B,D9,FE 
3780 DATA C9 
ARILOG * 2140 2960 3010 
ADR ! 1890 1900 2430 

ADRREG ! 740 740 1020 1020 1030 1030 1040 1040 1110 1170 117 
0 1230 1230 1410 1420 1470 1480 2790 
ADRBEF ■ 540 540 2720 2790 
A ! 520 1620 1630 1840 

AUS ( 220 220 220 1150 1170 1200 1230 1900 2000 2010 2020 27 
30 2930 

A í 90 90 100 110 280 280 290 320 320 330 340 1010 1020 1030 
1040 1070 1080 1810 1820 1840 2130 2130 2140 2650 2660 2670 
3060 3060 3100 3100 3150 3150 
BITTI t 2190 2960 3000 
Bir ! 1100 1110 1110 

BEDFLG I 880 990 1000 1090 1110 1110 
B I 740 740 740 740 740 750 

BEF í 670 680 700 700 710 730 770 860 2100 2960 3020 3030 30 
40 

BEAN ! 110 410 2940 2940 

C03 ! 2320 2330 

CG2 ! 2120 2130 2130 2130 2140 2190 2190 2310 
COI ! 2090 2190 2190 2300 
COND * 1080 2960 2970 
DIS * 2440 2440 2450 

DIS ! 2170 2430 2440 2440 2440 2440 
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DWFLAG ! 720 1950 1950 
ENDE I 1630 1630 1760 
ECHTSIM ! 590 590 600 660 1130 
EXROM ' 340 350 

HIS'IAT ! 300 300 310 330 340 340 340 350 350 2830 
I í 2260 2260 2400 2400 2410 2450 2450 
IFLAG ! 1910 1940 2050 2170 2250 

I ! 410 420 420 420 540 540 1080 1080 1090 1100 1100 1100 11 

00 1110 1550 1550 1550 1550 1560 1560 1580 1710 1710 1710 25 

60 2560 2560 2660 2660 2660 2940 2940 2970 2970 2980 2980 29 

90 2990 3000 3000 3010 3010 3020 3020 3030 3030 3040 3040 30 

60 3070 3090 3110 3140 3160 

K I 11B0 1180 
LB ' 2530 2550 

LA t 1550 1550 1560 1710 2560 2660 2810 
LOSTAT ' 270 290 290 290 350 2830 
MAXLAB ! 1580 1610 1710 2560 2660 

MST ! 1570 1670 1750 3050 3060 3060 

MENU í 110 120 130 420 420 420 2940 
ME ! 110 110 120 130 140 1610 

NOFLAG ! 520 1620 1630 1820 1830 
PORE I 1180 1190 1190 1190 1230 1230 

PR t 670 680 720 1010 1050 1070 1740 1950 1950 1960 1970 198 

0 1990 1990 2000 2010 2010 2010 2100 2110 2120 2140 2190 219 

0 2230 2360 2370 2380 2390 2390 2400 2400 2410 2410 2410 241 

0 2420 2470 2490 2510 2510 2510 2510 2560 2560 2560 2560 258 

0 2580 2580 2580 2610 2670 2670 2670 2670 

PO I 670 680 1010 1070 1320 1330 1350 1430 1460 1470 1480 19 

80 2000 2010 2010 2360 2370 2410 2410 2470 2480 2490 2510 25 

10 2560 2560 2580 2580 2610 2670 2670 

PC ! 520 520 520 720 720 780 910 1020 1030 1040 1050 1370 16 

20 1620 1620 1630 1710 1760 1890 2430 2650 2660 2700 2710 27 

10 

PRI í 70 2920 
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D ! 1160 1170 1170 IIBO 1190 1310 1320 1340 1350 1410 1410 1 

420 1420 1460 1470 1480 

QQ ! 540 2720 2720 2720 

RQTSCHI t 2190 2960 2990 

REG í 2120 2140 2190 2190 2330 

REGTAB -t 2120 2330 2960 2980 

ROMSTAT í 270 290 310 330 2770 2770 

S ! 3-070 3070 3080 3080 3110 3110 3120 3120 3160 3160 3170 
BOUFLAG ' 1520 1610 1650 1730 1770 

STAPEL ! 800 800 830 840 900 900 930 940 2790 2800 2800 
SP ! 800 810 810 810 820 820 820 830 830 840 840 900 910 910 
920 920 930 930 940 940 
SPRADR ' 720 780 810 810 820 820 
STATUS ! 350 350 2700 2780 
W •/. 2700 2700 2780' 


14 ' 

1950 

1950 

1950 

1950 

2050 

2050 

2060 

2070 

2100 

2110 

2170 


230 

2230 

2260 

2300 

23 10 

2320 

2430 

2510 

2530 

2550 

2630 

2630 

2 

630 

2640 

2640 

2650 

2650 

2660 

2700 

2720 

2730 

3060 

3070 

3070 

3 

100 

3110 

3110 

3150 

3160 

3160 









WA t 1550 1560 1710 2560 2660 2810 

WERT ' 1460 1470 1470 1480 1480 2550 2560 2580 

X ' 1800 1810 1850 

Y I 1800 1810 1850 

ZEINO ■ 1560 1570 1570 1660 1680 1680 1700 2820 

Z t 1300 1360 1370 1410 1420 1460 1560 1570 1660 1670 1690 I 
700 1710 1710 1740 1740 1750 

ZFLAG ! 150 150 150 480 480 530 640 1270 2720 
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DESCRIPCIGN DEL PROGRAMA 

Línea 10 - 60: 

Inicialización 
Línea 70 - 160; 

Bucle principal 
Línea 70: 

Si se detecta el -final de pantalla se realiza un scrolling (pri$) 
visualizándose 

Línea 100: 

Al pulsar IRETURN* repetir última entrada. 

Línea 110: 

Comprobar la entrada de los comandos por medio de las letras 
iniciales. 

Linea 120 - 140; 

Visualizar letra y comando y bifurcan a la rutina correspondiente. 
Línea ISO: 

Flag Z determina si puede simularse mediante la barra de espacio. 
Linea 180 - 190: 

Punto final del menú, por ejemplo "Hasta prontol". 


Línea 


210 - 230: 
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Punto del menú “Impresora Activada/Desactivada". 

Línea 230: 

Subrutina Flag 2 activo/desactivo. 

Línea 250 - 360: 

Punto del menú "Selección estado ROM/RAM". 

Línea 260 - 290: 

Entrada para LOW-ROM 
Línea 300 - 360: 

Entrada para HI6H-R0M 
Línea 340: 

Tratamiento de entrada del número del ROM de expansión. 
Línea 380 - 440: 

Las funciones P, E y R no deben influir en el flag 1 
posición del cursor. Esto se realiza mediante 1 
subrutina. 

Linea 510 - 560: 

Punto del menú simulador Z80. 

Línea 520: 

Extraer dirección inicial. 


ni a la 
presente 


Linea 


530 
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Visualizar registros. 

Linea 540: 

Borrar área de transíerencia de comandos. 

Línea 550: 

Desensamblar comandos. 

Línea 580 - 610: 

Punto del menú simulación real activada/desactivada. 
Línea 630 - 1130: 

Punto del menú barra de espacio=simular. 

Línea 640: 

Seguir únicamente si Flag Z activado. 

Linea 650: 

Mantener estado Flag Z. 

Línea 660: 

Si simulación real activada ejecutar comando de 1 
visualizar registros sin modiíicación. 

Línea 670 - 680: 

Código de comando hacia bef$. 

Línea 690 - 1120: 
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Simular comandos de bifurcación desde el BASIC 
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Linea 700: 

Comande JP/JR: cargar PC con dirección de destino indicada. 

Línea 710 - 720: 

Comandos RST: PC a dirección de destino; dirección RET a pila. 
Línea 730 - 760: 

Incrementar con B el comando DJN2. 

Línea 770 - 780: 

Comando CALL y rutina que almacena dirección de retorno en la 
pila. 

Línea 790 - 850: 

En este punto se corrigen la pila, SP y PC para bi-furcaciones a 
subrutinas (CALL y RST). 

Línea 860 - 880: 

Comando RET bed'flg=0 significa RET incondicional. 

Línea 890 - 950: 

Corrección de la pila, SP y PC en caso de retornos. 

Línea 970 - 1050: 

Aquí se inicializa el PC dependiendo de FL. Las bifurcaciones 
indirectas se tratan en las líneas 830-860. 
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Línea 1050: 

Inícialíra PC con dirección indicada. 

Línea 1060 - 1120: 

Sub (subrutina) inicializa FL con: 
l-,si es incondicional 
0-,si no se cumple la condición 
-l-,si se cumple la condición 

Línea 1100: 

Calcula número de bit del -flag actual en el registro de flags. 
Linea 1130: 

Simulación mediante programa máquina, si simulación real actis'ada 
y no se simulan comandos de bi-furcación. 

Línea 1140 - 1210: 

Salida -formateada de los contenidos de registros. 

Línea 1220 - 1240: 

Visualiza un registro de 16 bits. La posición de los registros se 
da según la secuencia de los comandos PUSH/POP del programa 
máquina. 

Linea 1260 - 1380; 

Rutina de entrada, si se modi-fican registros. 

Línea 1400 - 1440: 

Aquí se graban los registros estándard después de su modi-ficación, 
en las posiciones correspondientes de la memoria. 
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Línea 1450 - 1490: 

Después de una modifioación puede inicializarse nuevamente 
cualquier registro mediante esta rutina. 

Línea 1500 - 1580: 

Punto del menú "Generador -fuente". 

Línea 1540 - 1580: 

Define labels introducidos y genera las correspondientes "Lineas 
EOU" en el listado fuente. 

Línea 1600 - 1770: 

Punto del menú "Desensamblador" (también generador fuente). 

Línea 1610: 

Si se ha seleccionado el desensamblador se desactivan "Souflag" y 
"Max lab". 

Línea 1620: 

Entrada dirección inicial (con opción IRETURN*). 

Línea 1630; 

Entrada dirección final (con opción IRETURN»). 

Linea 1650: 

Saltea generador fuente en función desensamblador. 

Línea 1660; 


Genera línea en blanco 
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Línea 1670: 

Llama programa máquina que convierte 2í en línea. 

Linea 1630: 

Incrementar "Zeiso". 

Linea 1700: 

Genera comienzo de la siguiente línea. 

Línea 1710: 

Comprueba que label introducido es correcto. 

Línea 1720: 

Llama desensamblador. 

Línea 1740/1750: 

Genera línea recién desensamblada. 

Línea 1790 - 1860: 

Subrutina para entrada direcciones HEX reconociendo si 
introduce únicamente *RETLIRN*. 

Línea 1880 - 1900: 

ftquí se visualiza dirección actual. 

Línea 1920: 

Leer y visualizar siguiente byte. 


se 
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Linea 1930: 

Bi-furcaciún a la subrutina que ejecuta la interpretación. 

Linea 1940: 

Bi-furcar al tratamiento de comandos indexados si iflag activado 
(=-l). 

Línea 1950: 

Tratamiento de los comandos RST, que utilizan la palabra DATA 
siguiente. 

Línea 1960: 

Bifurcación si el comando contiene números. 

Línea 1970: 

Bifurcación si el comando contiene distancias relativas. 

Línea 1980 - 2020: 

Salida formateada. 

Línea 2040 - 2280: 

Subrutinas para la interpretación. 

Linea 2050: 

Bifurcación al tratamiento de comandos indexados. 

Línea 2060: 

Bifurcación al tratamiento de los comandos que comienzan con íiED. 
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Línea 2070: 

Bifurcación al tratamiento de los comandos que comienzan con SíCD. 
Línea 20B0: 

Bifurcación a la subrutina que descompone W en col(bit 6,7), 
co2(bit 5-3) y co3(bít 2-0). 

Linea 2090; 

Si col=0 o col=3 a linea 360, es decir leer comandos de la tabla, 
de lo contrario a linea 370, comandos de forma LD RES,RES. Línea 
390 comandos aritmético-lógicos de 8 bits. 

Línea 2100: 

Determinar PR$ según tabla. 

Línea 2120 - 2130: 

Comandos de la forma LD r,r y HALT. 

Línea 2130 - 2140: 

Comandos aritmético-lógicos. 

Línea 2150 - 2200: 

Tratamiento de los comandos que comienzan con el código !<CB. 

Linea 2160: 

Leer siguiente byte. 

Línea 2180: 


Descomponer en col, co2, co3. 
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Línea 2190: 

Generar prS para comandos rotación/desplacamiento (col=0.' y 
comandos de manipulación de bits. 

Linea 2210 - 2230: 

Tratamiento de los comandos que comienzan con el código !<ED. 

Línea 2220: 

Leer siguiente byte. 

Linea 2230: 

Si código es válido determinar el mismo según tabla (linea 2100). 
Linea 2240 - 2280: 

Primer tratamiento de los comandos inde;:ados. 

Linea 2250: 

Activar flag. 

Linea 2260; 

Almacenar en i$ el registro (IX ó lY). 

Linea 2270: 

Leer siguiente byte. 

Linea 2280: 

Comenzar interpretación nuevamente (línea 300). 


Linea 2290 - 2330: 
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SUB Descomponer código, w se descompone en col (Bit 7,6), co2 (Bit 
5-3) y co3 (Bit 2-0). Regí contiene el registro correspondiente a 
co3. 

Línea 2350 - 2450: 

Comandos indexados "segundo tratamiento". Comprobar si está 
permitido el comando indexado; en caso a-firmativo reemplazar HL 
con lí. Si existe un desplazamiento las líneas 2430, 2440 indican 
esta distancia. 

Línea 2460 - 2590: 

Si pr$ contiene una "n" la misma se reemplaza por un número. 

Linea 2490 - 2520: 

Números de un byte (n). 

Línea 2530 - 2590: 

Reemplazar, números de 2 bytes (nn). Si se ejecuta el generador 
tuente se comprueba si dirección = Label. 

Línea 2600 - 2680: 

Reemplazar desplazamiento (e). 

Línea 2630 - 2640: 

Calcular desplazamiento. 

Línea 2650 - 2670: 

Aplicar desplazamiento y comprobar si dirección destino = Label. 
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Linea 2690 - 2740: 

SUB leer y visualizar siguiente byte, si el simulador 
desactivado "pokear" código de comando al programa máquina. 

Línea 2750 - 3180: 

Inicialización: con-fección de las tablas. 

Línea 3190 - 3780: 

Líneas DATA. 


está 
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LISTA DE VARIABLES 

A - 

A* - 
ADR - 
ADRREG - 
ADRBEF - 
AUS - 
B - 
BEAN - 
BEDFLG - 
BEF$ - 
BIT - 
COI - 
C02 - 
C03 - 
DIS - 
DIS$ - 
ENDE - 
ECHTSIM - 
EXRDM - 
HISTAT - 
IFLAG - 

I - 
K - 
LB - 

LOSTAT - 
MST - 

MAXLAB - 
ME - 
N0FLA6 - 
PC - 

PO - 


Retorno de SUB "Hex.-Dec." valor de A$ 
interpretado como número hex. 

Transferencia de subrutinas de diversas tareas. 
Dirección primer código del comando actual. 
Dirección registro de transferencia. 

Dirección transferencia del comando. 

Canal dispositivo salida 
Valor registro B. 

Cantidad de comandos. 

Flag de condiciones. -1,0,1 
Código de comando. 

Número de bit. 

Bit 7 y 6 
Bit 5 a 3 
Bit 2 a 0 

Distancia en comandos indexados 
Distancia string para salida 
Ultima dirección para desensamblaje. 

Flag simulación real. 

Número ROM de expansión. 

Estado Upper ROM 0, 1 ROM/RAM. 

Activado, si direccionamiento indexado, de lo 
contrario desactivado. 

Contador. 

Contador. 

Almacenamiento temporal del Low-byte de números 
de 2 bytes 
Estado Lower ROM. 

Dirección inicial programa máquina, generador 
1íneas. 

Cantidad de labels introducidos. 

Número del punto del menú. 

"Si IRETURN* al introducir dirección" flag. 
Apuntador de programa indica la dirección de la 
posición actual. 

Posición de n, nn, e, HL... en PR* 
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PORE 

PRI$ 

PR* 

Q 

QQ 

REG$ 

ROMSTAT 

S 

S0UFLA6 

STAPEL 

SP 

SPRADR 

STATUS 

wv. 

WERT 

X 

Y 

ZEINO 

2 $ 

ZFLAG 


TABLAS 


regtab$ (7) 
rotschíeí (7) 
bitti* (3) 
arilog* (7) 
beT$ <255) 


menú* 

LA* 

WA* 

CONO* 


Posición registro 
String para scrolling. 

PR* contiene comando interpretado de ensamblador 
Contador. 

Contador transferencia de comandos al simulador. 
Registro transferencia de comandos prog. máquina. 
Contiene ROM/RAM activo/desactivo. 

Suma de comprobación. 

Flag generador fuente. 

Dirección de SP 
SP 

Dirección de bifurcación. 

Estado ROM/RAM para Far Cali. 

Valor leído de RDEEK. 

Valor de un número de 2 bytes (nn) 

Entrada posición X. 

Entrada posición Y. 

Número de línea para fuente. 

Línea para fuente y entrada línea modificación 
de registro. 

Flag de simulación. 


Registros 

Comandos rotación y desplazamiento 
Comandos manipulación bits 
Comandos aritméticos/lógicos 

0 hasta $(3F: comandos que comienzan con ?<ED y 

que tienen como byte 1 un número 
&40 - !<BF; comandos que comienzan con ?(ED y que 
tienen como byte 2 un número 

&BF - SiFFi comandos que tienen como byte 1 un 
número 

Códigos de comando extendidos (Bean). 

Label* 

Dirección correspondiente a los labels. 
Condiciones (7). 
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RUTINAS DEL SISTEMA 


INTRODUCCION 

La utilización e-fectiva de rutinas del sistema es el ABC de la 
programación en lenguaje máquina. En el caso de los ordenadores 
CPC nos hemos de enfrentar en primer lugar a algunos problemas. 

Al conectar el ordenador, las 64K de memoria se encuentran 
íntegramente ocupadas por el RAM, que contiene únicamente una 
pequeña porción de las rutinas del sistema. El sistema operativo, 
como ya hemos explicado, se encuentra "por debajo" del RAM en las 
direcciones !í 0 hasta !<3FFF. Las direcciones intermedias, !5<4000 a 
Í<BFFF generalmente se encuentran inicializadas con RAM. En el área 
superior de direcciones !íCOOO hasta !!<FFFF se solapan el RAM de 
vídeo, el ROM de BASIC, el ROM del sistema operativo de diskette y 
eventualmente 252 ROM de expansión. En el caso del CPC 6128 ocurre 
además que el área de direcciones se encuentra íntegramente 
solapada con las segundas 64Kbytes de RAM. 

Para poder manejar todos estos ROMs y RAMs, hace falta un 
procedimiento que se conoce como "Bankswitching". Esto significa 
que la memoria deseada puede conectarse según las necesidades para 
el área actual de direcciones. Para lograr esto se utilizan los 
comandos RESTAT. Estos comandos acceden a las direcciones hasta 
ít38. En éstas posiciones, los contenidos dél ROM y del RAM son 
iguales. Ello puede comprobarse fácilmente con el desensamblador. 
De esta forma queda asegurado que los comandos RESTART pueden 
utilizarse siempre de la misma forma independientemente de la 
actual configuración de memoria. 

Casi todos los comandos RESTART bifurcan al área de direcciones 
desde tiABSO hasta &BFFF. Allí generalmente está seleccionado el 
RAM, es decir, que las rutinas seleccionadas siempre están 
presentes. Estas rutinas se ocupan entonces según la necesidad de 
la conmutación entre los diferentes ROMs y RAMs. 
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En el área RAM mencionada se encuentran también los vectores de 
bifurcación hacia todas las rutinas importantes del sistema 
operativo y hacia las rutinas aritméticas. A través de estos 
vectores de bifurcación se realiza todo tipo de comunicación entre 
el BASIC y el sistema operativo. 

Un vector de bifurcación es de gran utilidad. En lugar de bifurcar 
directamente a una rutina determinada, se bifurca a una dirección 
previamente determinada (!) en la cual se encuentra el comando de 
bifurcación para esta rutina. Este procedimiento ofrece varias 
ventajas. 

1. En el caso de la familia CPC, donde ya existen tres versiones 
de ROM diferentes, el programador en lenguaje máquina puede 
confeccionar programas utilizando los vectores descritos, de tal 
forma que los programas realizados con esta técnica pueden 
aplicarse en cualquiera de los tres ordenadores. 

2. También es posible modificar (parchear) los vectores para que 
apunten a rutinas propias. De esta forma nos aseguramos que el 
sistema utilice estas rutinas propias de forma automática. Este 
procedimiento se utiliza asimismo si se conecta un dispositivo de 
diskette al CPC. 

Aparte de los vectores, el tercer RAM (StBOOO hasta 8<BFFF) contiene 
gran número de posiciones de memoria en las cuales el sistema 
almacena importantes informaciones, los llamados PEEKB y POKES. 

Resumimos: 

En las direcciones !<0 hasta MO se encuentran las rutinas de 
los comandos RST en el ROM y en el RAM, las cuales posibilitan la 
comunicación entre los diferentes componentes de memoria. Dado que 
para cada RESTAR! en un vector de bifurcación sólo se dispone de 8 
bytes para longitud de programa, estas rutinas RESTAR! bifurcan a 
las rutinas reales de ejecución en el tercer RAM activado 
permanentemente. 
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Por ello algunos comandos RESTAR! de los ordenadores CPC pueden 
denominarse como comandos ampliados de JUMP o CALL, con los cuales 
es posible indicar adicionalmente el estado ROM/RAM para la 
dirección de destino de bi-furcación. La -función exacta de los 
comandos RST se detalla más adelante. 

En el tercer RAM se encuentran vectores de bifurcación, que en 
general son comandos RST así como importantes PEEKs y POKEs. 

Una de las rutinas del sistema de mayor importancia es la que se 
utiliza para la visualización de un carácter en la pantalla, que 
puede llamarse mediante CALL t<BB5A. Esta rutina visualiza un 
carácter que corresponde al valor contenido en el ACU. 

Confeccione un programa para la salida del set de caracteres 
(códigos 32 a 255) del CPC. 


Solución: 


10 

r 

ORG 

?<A000 


20 

’PRINT 

EQU 

:<BB5A 


30 


LD 

B,223 

; Contador = 255 - 32 

40 

> 

LD 

A, 32 


50 

’SCHLEI 

CALL 

PRINT 

; Visualizar CHR$(A) 

60 

f 

INC 

A 


70 

f 

DJNZ 

SCHLEI 


80 

f 

RET 



90 

9 

END 




En relación con la salida de caracteres el ensamblador posee el 
pseudo-comando DM. Al comando DM sigue como operando una palabra 
entre comillas. Los códigos ASCII de las letras de la palabra se 
almacenan mediante DM a partir de la dirección actual. Vean el 
siguiente programa: 
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10 ’ 

ORG 

8<A000 


20 ’FRINT 

EQU 

S<BB5A 


30 ’ 

LD 

HL,W0RT 

; Direcc. palabra a visualizar 

40 ’SCHLEI 

LD 

A, (HL) 

; Cargar ACU cod. ASCII letra 

50 ’ 

INC 

HL 

; Pos. apunt. siguiente letra 

60 ’ 

CALL 

PRINT 


70 ’ 

OR 

A 

; Activar flags 

80 ’ 

JR 

N2,SCHLEI 

; No cero, letra siguiente 

90 ’ 

RET 



100 ’WORT 

DM 

"CPC" 


lio ’ 

DB 

0 


120 ’ 

END 




El Null-byte generado por DB 0 al -final de la palabra (línea 110) 
sirve para reconocer el final de la palabra a visualizar. 

Ejecutando disassembler a partir de la dirección de entrada de la 
rutina (?<BB5ft) obtenemos lo siguiente: 

BB5A CF 00 94 RST Í/08/DW: S<9400 

En la dirección !<BB5A se encuentra un comando Restart hacia 
dirección J<0008. Si aquí continuamos la traducción, obtenemos: 

0008 C3 82 B9 JP &B982 

Esta rutina (a partir de !<B982) se denomina como "Rutina RST í<08" 
y provoca un tratamiento especial de los 2 bytes (Low-High) 
siguientes al comando RST JiOS. Por esta razón, el disassembler 
visualiza los bytes siguientes a RST !<08 con la marca DW (Data 
Word, es decir low y high-byte). DW representa también un pseudo- 
comando, que provoca que el Data-word siguiente al comando, un 
número de 2 bytes, se almacene en la posición correspondiente de 
la memoria. Los bits 0-13 se interpretan como dirección de destino 
de bifurcación (con 14 bits pueden representarse direcciones en el 
área í<0 hasta !<3FFF). Bit 14 y 15 se utilizan para la selección de 
ROM/RAM. 
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Bit 14 determina el estado del área de S..0-!<3FFF. Bit 15 determina 
el estado del área de ?<C000 hasta SíFFFF (RAM pantalla o ROM 
BASIC). Un bit activado selecciona el RAM y el bit desactivado el 
ROM. 

¿Qué estado y qué destino de bifurcación tiene el siguiente 
comando? 

RST S<08 
DW ?<9400 

Descomponemos: 

Íi9400=?<8000+!<1400=?<X01 01 0100 0000 0000 

Bit 15 = 1 ==> RAM de pantalla 

Bit 14 = 0 ==> ROM sistema operativo 

Dirección: !il400 

RST íiOB/DW 8(9400 provoca una bifurcación a la rutina del sistema 
operativo en dirección í¡1400. Se ha seleccionado la pantalla 
(RAM). 

Aunque los comandos RST constituyen principalmente bifurcaciones a 
subrutinas, es decir la dirección de retorno se almacena en el 
stack, el comando RST í¡08 no es una subrutina sino una bifurcación 
normal. Esto se realiza mediante la manipulación de la pila en la 
rutina a partir de ?<B982. 

También los restantes comandos RST tienen tareas especiales, que 
les explicaremos a lo largo del presente capítulo. 

Con la ayuda de la rutina FRINT confeccionaremos ahora un programa 
MONITOR. 
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EL MONITOR 

Dado que visualizamos los contenidos de memoria en números 
hexadecimales, necesitamos en primer lugar una subrutina que 
\/isualice un byte como número hexadecimal. El byte a visualizar se 
transfiere a través del ACU. 

Ejemplo! A = 63 = Í<3F = Í(X 0011 lili 

F corresponde a los 4 bits inferiores (High-nibble). 

3 corresponde a los 4 bits superiores (Low-nibble). 

En primer lugar se visualiza el High-nibble. Para ello desplazamos 

4 veces el contenido del ACU hacia la derecha (rotación de 8 
bits). El resultado de este desplazamiento es ?<X lili 0011. A 
continuación se borran los 4 bits superiores medíante AND. 
Seguidamente el ACU contiene el valor !<X 0000 0011 = 3. Este valor 
(3) debe visualizarse. 

El código ASCII de 3 es 51. Para obtener el valor 51 en el ACU 
hemos de sumar 48 al contenido del mismo (=3). A continuición 
llamamos a la rutina PRINT. Para visualizar el Low-níbble borramos 
los 4 bits superiores del contenido antiguo del ACU. Después de la 
adición de 48 obtenemos 63. Como salida queremos obtener F 
<?<F=15). El valor ASCII de F es 70, lo que significa que si el 
número hexadecimal a visualizar es mayor que 9 (por lo tanto 
representable con una letra) hemos de sumar adícíonalmente 7 antes 
de llamar la rutina. 

Intenten confeccionar la rutina para la salida de un byte en 
formato hexadecimal. 

AOOO 10 ORG !<A000 

AOOO 20 PRINT EQU «<BB5A 

AOOO 30 ; SALHEX 

AOOO 40 j Visualiza ACU en hexadecimal 

AOOO 50 i Registro-E se modifica 

AOOO 5F 60 AUSHEX LD E,A ; Almacenar ACU temp. 

AOOl OF 70 RRCA ; Rotar ACU 

A002 OF 80 RRCA ; por 4 bits 

A003 OF 90 RRCA ; hacia la 
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A004 

OF 

100 

RRCA 


Derecha 

A005 

E60F 

lio 

AND ¡«Xllll 


Borrar bit 4-7 

A007 

CDOOOO 

120 

CALL conv 


Visualizar high-nibble 

AOOA 

7B 

130 

LD A,E 


Contenido anterior ACU 

AOOB 

E60F 

140 

AND i<Xllll 


Borrar bits 4-7 

AOOD 

CDOOOO 

150 

CALL conv 


Visualizar LoM-nibble 

AOlO 

C9 

160 

RET 


Final AUSHEX 

AOll 


170 ; Rutina conv 



AOll 


180 ; visualiza cont. 

ACU en Hex 

»«*« 

Línea 

120: CONV 

= SiAOll 



t*** 

Línea 

150: CONV 

= «(AOll 



AOll 

FEOA 

190 CONV 

CP «¡A 

? 

Valor numero < 10 

A013 

38FE 

200 

JR C,ZAHL 

f 

Si, entonces hacia nro. 

A015 

C607 

210 

ADD A,7 

f 

Sumar 7 para letra 

***t 

Linea 

200: zahl 

= «(A017 



A017 

C630 

220 ZAHL 

ADD A,48 


; = codigo ASCII del 






Numero Hexadecimal 

A019 

CD5ABB 

230 

CALL PRINT 



AOIC 

C9 

240 

RET 


; Final CONV 

Programa : SALHEX 




Inicio : !<A000 Final : &A01C 



Longitud : OOIB 






O Errores 

Tabla de variables! 

PRINT BBSA AUXHEX AOOO CONV AOll ZAHL A017 


Con este programa podemos con-feccionar en lenguaje máquina la 
salida para el programa COMPARE del último capítulo. Unan ambos 
programas de manera que la rutina anterior se ocupe de la salida 
de las direcciones. 
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AOOO 


10 

COMPARE 




AOOO 


20 


ORG 

8(A000 



AOOO 


30 

PRINT 

EQU 

?<BB5A 



AOOO 


40 

ANF 

DS 

2 



A002 


50 

ENDE 

DS 




A004 


60 

ANFVER 

DS 

2 


Inicio bloque comp. 

A006 

EDbBOOAO 

70 


LD 

DE,(ANF) 



AOOA 

2A02A0 

80 


LD 

HL,(ENDE) 



AOOD 

B7 

90 


OR 

A 



AOOE 

ED52 

100 


SBC 

HL,DE 

$ 

Longitud bloque 

AOlO 

23 

lio 


INC 

HL 

9 

HL + 1 

AOll 

44 

120 


LD 

B,H 



A012 

4D 

130 


LD 

C,L 

J 

Cargar hacia BC 

A013 

EB 

140 


EX 

DE,HL 

5 

ANF hacia HL 

A014 

ED5B04A0 

150 


LD 

DE,(ANFVER) 

<1 

Apuntador bloque 

A018 

lA 

160 

WEITER 

LD 

A, (DE) 

9 

Ele. comparación 

A019 

13 

170 


INC 

DE 



AOIA 

EDAl 

180 


CPI 



Comp. (HL) con A 

AOIC 

C40000 

190 


CALL 

NZ,AUSGA 


Salida por desigual 

AOIF 

EA18A0 

200 


JP 

PE,WEITER 

9 

Siguiente ele. 

A022 

C9 

210 


RET 


9 

Final COMPARE 

A023 


220 




9 


**tt 

LINEA 190: 

AUSGA = &A023 




A023 

D5 

230 

AUSGA 

PUSH 

DE 


Salvar apunt. blq. 

A024 

F5 

240 


PUSH 

AF 


Salvar Plags 

A025 

2B 

250 


DEC 

HL 


Decr. HL salida 

A026 

7C 

260 


LD 

A,H 



A027 

CDOOOO 

270 


CALL 

AUSHEX 


Visualizar Lowbyte 

A02A 

7D 

280 


LD 

A,L 



A02B 

CDOOOO 

290 


CALL 

AUSHEX 


Visualizar Highbyte 

A02E 

23 

300 


INC 

HL 


Reconstruir HL 

A02F 

3E20 

310 


LD 

A,í<20 


Espacio blanco 

A031 

CD5ABB 

320 


CALL 

PRINT 



A034 

F1 

330 


POP 

AF 



A035 

DI 

340 


POP 

DE 



A036 

C9 

350 


RET 



Final AUSGA 

A037 


360 
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A037 

A037 

A037 

t*t* 

370 

380 

390 

Linea 270: AUSHEX = 

J<A037 

; SALHEX 

; Visualiza ACU HEX 
; Modí-fíca reg E 

t*** 

Linea 290: AUSHEX = 

Í<A037 


A037 

5F 

400 AUSHEX 

LD E,A 

; Almacenar ACU temp. 

A038 

OF 

410 

RRCA 

; Rotar ACU 

A039 

OF 

420 

RRCA 

; por 4 bits 

A03A 

OF 

430 

RRCA 

; hacia la 

A03B 

OF 

440 

RRCA 

; derecha 

A03C 

E60F 

450 

AND ?<xini 

; Borrar bit 4-7 

A03E 

CDOOOO 

460 

CALL conv 

; Vis. high-níbble 

A041 

7B 

470 

LD A,E 

; Cont. anterior ACU 

A042 

E60F 

480 

AND ííXllll 

; Borrar bits 4-7 

A044 

CDOOOO 

490 

CALl conv 

; Vis. Low-nibble 

A047 

C9 

500 

RET 

; Final AUSHEX 

A048 

A048 


510 ; Rutina conv 

520 ; visualiza cont. ACU 

en Hex 

ttKt. 

Línea 

460: CONV = 

!<A048 


*t*t 

Línea 

490: CONV = 

Í<A048 


A048 

FEOA 

530 CONV 

CP 8<A 

; Valor numero 10 

A04A 

38FE 

540 

JR C,ZAHL 

; Si, hacia nro. 

A04C 

38FE 

550 

JR C,ZAHL 


A04E 

C607 

560 

ADD A,7 

; + 7 para letra 


Línea 

540: ZAHL = 

!<A050 


tttt 

Linea 

550: ZAHL = 

S(A050 


A050 

C630 

570 ZAHL 

ADD A,48 

; = codigo ASCII del 

A052 

CD5ABB 

580 

CALL PRINT 

Numero Hexadecimal 

A055 

C9 

590 

RET 

5 Final CONV 


Programa: COMPHEX 
Start! SíAOOO Ende: !<A055 
Longitud: 0056 
0 Errores 

Tabla de variables: 

PRINT BB5A ANF AOOO ENDE A002 ANFVER A004 
WEITER A018 AUSGA A023 AUSHEX A037 CONV A048 
ZAHL A050 
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Continuaremos con la rutina MONITOR. Desde el BASIC se trans-fieren 
las direcciones inicial y final. 


10 

t 

ORG 

ííAOOO 

20 

’PRINT 

EQU 

!(BB5A 

30 

’START 

DS 


40 

'ENDE 

DS 

2 


Carguemos en primer lugar 
visualizándola a continuación. 


HL con la dirección inicial, 


50 ’ LD HL,(START) ; Apuntador 


60 ’WEI16 

LD 

A,H 

70 ’ 

CALL 

AUSHEX 

80 ’ 

LD 

A.L 

90 ’ 

CALL 

AUSHEX 


; Visualizar highbyte 
; Visualizar lowbyte 


A continuación se visualiza un espacio en blanco. 

100 ' LD A,?<20 ; ASCII del espacio en blanco 

lio ’ CALL PRINT 

Seguidamente visualizaremos los valores de las 16 posiciones 
siguientes de memoria (8 en MODE 1): 


120 ’ 

LD 

B, 16 

130 ’WEI 

LD 

A,(HL) 

140 ’ 

CALL 

AUSHEX 

150 ’ 

LD 

A, 8(20 

160 ’ 

CALL 

PRINT 

170 ’ 

INC 

HL 

180 ’ 

DJNZ 

MEI 


Contador 

Cargar byte al ACU 
y visualizarlo 
espacio en blanco 
Visualizar 


Lo siguiente es visualizar un espacio en blanco y los últimos 16 
(8) bytes como caracteres ASCII. De los códigos mayores que 127 
se restan 128 (se desactiva bit 7). Para códigos menores que 32 
(caracteres de control) se visualiza un punto (ASCII=46). 
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190 ’ 

LD 

A,&20 




200 ’ 

CALL 

PRINT 

9 

Espacio en blanco 


210 ' 

LD 

DE, 16 




220 ’ 

OR 

A 

•1 

Carry = 0 


230 ’ 

SBC 

HL,DE 


Decrementar apuntador en 16 

240 ■' 

LD 

B, 16 




250 ’WEIftS 

LD 

A, (HL) 

• 

9 

Cargar ACU con byte 


260 ’ 

INC 

HL 

5 

Incrementar apuntador 


270 ’ 

RES 

7,A 


Convertir car. gráfico 

a ASCII 

280 ’ 

CP 

?<20 


Mayor igual 32? 


290 ’ 

JR 

NC,PR 


Si, entonces salida 


300 ’ 

LD 

A,46 


ASCII para punto 


310 ’F'R 

CALL 

PRINT 


Visualizar carácter 


320 ’ 

DJNZ 

WEIAS 




Para llegar 

al inicio de la 

línea siguiente trans-ferimoi 

5 Código 

y código lOi 






(CHR«(13) = 

Carriage Return 

= Enter) 


(CHR*(10) = 

Line Peed = Avance de línea) 


330 ’ 

LD 

A, 13 

• 

• 

Carriage Return 


340 ’ 

CALL 

PRINT 

• 

Salida 


350 ' 

LD 

A, 10 


Avance linea 


360 ’ 

CALL 

PRINT 

■ 

9 

Salida 


Ahora se comprueba si hemos 

llegado al final: 


370 ’ 

PUSH 

HL 

9 

Salvar apuntador 


380 ’ 

LD 

DE,(ENDE) 




390 ’ 

OR 

A 

; 

Carry = 0 


400 ’ 

SBC 

HL,DE 

5 

Apuntador final < = 0 


410 ’ 

POP 

HL 

5 

Extraer apuntador 


420 ’ 

JR 

C,WEI16 

? 

HL - DE < 0 entonces 

seguir 

430 ’ 

JR 

Z,MEI16 

9 

HL - DE = 0 entonces seguir 

440 ’ 

RET 


9 

HL - DE > 0 entonces 

final 

450 ’ 



% 

Final MONITOR 
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Queda por agregar la rutina AUSHEX y nuestro programa puede 
funcionar: 

460 ’ ; SALHEX 

470 ’ ; Visualiza ACU en HEX 
480 ’ ; Modifica el registro E 


490 

’AUSHEX 

LD 

E,A 

9 

Almacenar ACU temp. 

500 

J 

PRCA 


9 

Rotar ACU 

510 

ü 

RRCA 


9 

por 4 bits 

520 

J 

PRCA 


9 

hacia la 

530 

> 

RRCA 


9 

derecha 

540 

f 

AND 

?<xiin 

9 

Borrar bit 4-7 

550 

r 

CALL 

conv 

9 

Vis. high-nibble 

560 

> 

LD 

A,E 

9 

Cont. anterior ACU 

570 

9 

AND 

?<X 1111 


Borrar bits 4-7 

580 

9 

CALL 

conv 


Vis. Low-nibble 

590 

> 

RET 


9 

Final AUSHEX 

600 




9 

Rutina conv 

610 

f 



9 

visualiza cont. ACU en Hex 

620 

’CONV 

CP 

!<A 

9 

Valor numero < 10 

630 

9 

JR 

C,ZAHL 

9 

Si, hacia nro. 

640 

9 

ADD 

A,7 

9 

+ 7 para letra 

650 

’ZAHL 

ADD 

A, 48 

9 

= codigo ASCII del 






Numero Hexadecimal 

660 

9 

CALL 

PRINT 



670 

9 

RET 


9 

Final CONV 

680 

9 

END 





Con esta rutina solamente podemos leer el RAM. Para acceder al ROM 
utilizamos el comando RST MS. Este comando provoca en el CPC un 
llamado PAR CALL. Los 2 bytes siguientes a RST &18 representan un 
apuntador a la dirección de un vector de bifurcación. En la 
dirección de vector indicada se encuentran 3 bytes. Los 2 primeros 
apuntan a la dirección real de bifurcación y el tercero determina 
el estado ROM/RAM. 
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Ejemplo: 



ííAOOO 

RST 

?<1B 

?<A001 

DW 

Vekaddr 

&A003 

RET 


Vekaddr 

DW Zielad 


DB Status 

Mediante el comando RST !<1B en ?<A000 se realiza una bi-turcación de 
subrutina hacia Zielad (V) donde el Status (V) determina si se 
selecciona ROM o RAM. 

Para Status (V) se utilizan los valores siguientes: 

Status » ííO-WFFF (Sistema operativo) * «(COOO-ÍíFFFF (BASIC) 
- m - n - 


S(FC=252: 1 

ROM 

1 

ROM 

Í<FD=253: » 

RAM 

t 

ROM 

?<FE=254: » 

ROM 

* 

RAM 

Í(FF=255: » 

RAM 

* 

RAM 


Todos los restantes valores del estado seleccionan un ROM de 
expansión. 

El área comprendida entre !<4000 y ScBFFF se utiliza sin excepción 
como área de direcciones RAM. 

El nombre "FAR CALL" (significa "llamada remota"), expresa que a 
través del comando RST í<18 son posibles bifurcaciones a todos los 
RAM y ROM del ordenador. El FAR CALL funciona como un CALL, es 
decir después de un RST S<18, se produce la bifurcación a la 
subrutina ejecutándose la misma hasta encontrar el correspondiente 
comando RET; la ejecución del programa se continúa entonces en el 
comando siguiente al RST que ha provocado la bifurcación. 

Si queremos leer el ROM mediante la rutina MONITOR, llamamos a la 
misma a través del comando RST &18. La dirección que indica el 
vector de bifurcación es entonces la dirección inicial de la 
rutina MONITOR. Para seleccionar ambos ROMS el estado es 252. 
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La ampliacián del programa es la siguiente: 


10 

f 

ORG 

O 

o 

o 

<r 


20 

> 

RST 

S<18 


30 

> 

DW 

Vektor 


40 


RET 

5 

Retorno al BASIC 

50 

’VEKTOR 

DW 

MONITO ; 

Dirección vector bi+'urcacion 

60 

’STATUS 

DB 

252 ; 

Estado ROM/ROM 

70 

’PRINT 

EQU 

?<BB5A 


80 

’START 

DS 

2 


90 

'ENDE 

DS 

X 


100 

’MONITO 

LD 

HL,(START) 

; Apuntador 


El listado completo de ensamblador: 


AOOO 


10 

ORG 

«(AOOO 



AOOO 

DF 

20 

RST 

«(18 



AOOl 

0000 

30 

DW 

vektor 



A0Ó3 

C9 

40 

RET 



Retorno al BASIC 

*tt* 

Linea 30: 

VEKTOR = 8<A004 




A004 

0000 

50 VEKTOR 

DW 

MONITO 

$ 

Dir. vector-biturc. 

A006 

FC 

60 STATUS 

DB 

252 

f 

Estado ROM-ROM 

A007 


70 PRINT 

EQU 

«(BB5A 



A007 


80 START 

DS 

2 



A009 


90 ENDE 

DS 

2 



*$$t 

Linea 50: 

MONITO = «(AOOB 




AOOB 

2A07A0 

100 MONITO 

LD 

HL,(START) 

9 

Apuntador 

AOOE 

7C 

lio WEI16 

LD 

A,H 

9 

Visualizar highbyte 

AOOF 

COOOO 

120 

CALL 

AUSHEX 



A012 

7D 

130 

LD 

A,L 

9 

Visualizar Lowbyte 

A013 

CDOOOO 

140 

CALL 

AUSHEX 



A016 

3E20 

150 

LD 

A, «(20 

» 

ASCII esp. blanco 

A018 

CD5ABB 

160 

CALL 

PRINT 



AOIB 

0610 

170 

LD 

B,16 

; 

Contador 

AOID 

7E 

180 WEI 

LD 

A, (HL) 

5 

Cargar byte en ACU 

AOIE 

CDOOOO 

190 

CALL 

AUSHEX 

$ 

y visualizar 
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A021 

3E20 

200 

LD 

A,8<20 

9 

Espacio en blanco 

A023 

CD5ABB 

210 

CALL 

PRINT 

9 

Visual izar 

A026 

'?3 

220 

INC 

HL 



A027 

10F4 

230 

DJN2 

WEI 



A029 

3E20 

240 

LD 

A,í<20 



A02B 

CD5ABB 

250 

CALL 

PRINT 

5 

Espacio en blanco 

A02E 

111000 

260 

LD 

DE, 16 



A031 

B7 

270 

OR 

A 

|l 

Carry = 0 

A032 

ED52 

280 

SBC 

HLjDE 

9 

Decr. ap. en 16 

A034 

0610 

290 

LD 

B, 16 



A036 

7E 

300 WEIAS 

LD 

A, (HL) 

9 

Cargar ACU con byte 

A037 

23 

310 

INC 

HL 


Incrementar apunt. 

A038 

CBBF 

320 

RES 

7,A 

9 

Convertir carácter 







gra-fico en ASCII 

A03A 

FE20 

330 

CP 

8<20 

9 

Mayor igual 32 

A03C 

30FE 

340 

JR 

NC,PR 

5 

Si, salida 

A03E 

3E2E 

350 

LD 

A, 46 


ASCII para punto 

UK* 

Linea 340: 

PR = 8<A040 





A040 

CD5ABB 

360 PR 

CALL 

PRINT 

5 

Visualizar carácter 

A043 

lOFl 

370 

DJNZ 

WEIAS 



A045 

3E0D 

380 

LD 

A, 13 

9 

Carriage Return 

A047 

CD5ABB 

390 

CALL 

PRINT 

9 

Salida 

A04A 

3E0A . 

400 

LD 

A, 10 


Avance linea 

A04C 

CD5ABB 

410 

CALL 

PRINT 

9 

Salida 

A04F 

E5 

420 

PUSH 

HL 

9 

Salvar apuntador 

A050 

ED5B09A0 

430 

LD 

DE, (ENDE) 



A054 

B7 

440 

OR 

A 

9 

Carry = 0 

A055 

ED52 

450 

SBC 

HL,DE 

5 

Apunt. > =0 

A057 

El 

460 

POP 

HL 

9 

Extraer apuntador 






(sin 

influencia flags) 

A058 

38B4 

470 

JR 

C,WEI16 

> 

HL-DE < 0, seguir 

A05A 

28B2 

480 

JR 

Z,WEI16 

9 

HL-DE=0, seguir 

A05C 

C9 

490 

RET 


9 

HL-DE > 0, final 

A05D 


500 



9 

Final MONITOR 

A05D 


510 



9 

SALHEX 

A05D 


520 



9 

Visualiza ACU HEX 

A05D 


530 



9 

Modifica reg E 

ttt* 

Linea 120: AUSHEX = 

ScA05D 
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Linea 

140: AUSHEX = 

!<A05D 


tt** 

Linea 

190: AUSHEX = 

!<A05D 


A05D 

5F 

540 AUSHEX 

LD E.A 

Almacenar ACU temp. 

A05E 

OF 

550 

RRCA 

Rotar ACU 

A05F 

OF 

560 

RRCA 

por 4 bits 

A060 

OF 

570 

RRCA 

hacia la 

A061 

OF 

580 

RRCA 

derecha 

A062 

E60F 

590 

AND ííXllll 

Borrar bit 4-7 

A064 

CDOOOO 

600 

CALL conv 

Vis. high-nibble 

A067 

7B 

610 

LD A,E 

Cont. anterior ACU 

A068 

E60F 

620 

AND &X1111 

Borrar bits 4-7 

A06A 

CDOOOO 

630 

CALL conv 

Vis. Low-nibble 

A06D 

C9 

640 

RET 

Final AUSHEX 

A06E 

A06E 


650 ; Rutina conv 

660 ; visualiza cont. ACU en 

Hex 


Línea 600: CONO = 

Í<A06E 


*tt* 

Linea 630: CONV = 

5<A06E 


AOóE 

FEOA 

670 CONV 

CP !<A 

Valor numero < 10 

A070 

38FE 

680 

JR CjZAHL 

Si , hacia nro. 

A072 

C607 

690 

ADD A,7 

+ 7 para letra 


Linea 680: ZAHL = 

S<A074 


A074 

C630 

700 ZAHL 

ADD A,48 

= codigo ASCII del 

A076 

CD5ABB 

710 

CALL PRINT 

numero hexadecimal 

A079 

C9 

720 

RET 

Final CONV 


Programa: MONITOR 
Start: S<AOOO Ende: !(A079 
Longitud: 007A 
0 Errores 

Tabla de variables: 


VEKTOR 

A004 

STATUS 

A006 

PRINT 

BB5A 

START 

A007 

ENDE 

A009 

MONITO 

AOOB 

WEI16 

AOOE 

WEI 

AOID 

MEIAS 

A036 

PR 

A040 

AUSHEX 

A05D 

CONV 

A06E 


ZAHL A074 
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El programa de manejo BASIC: 


10 REM Programa manejo MONITOR 
20 MEMORY ?<9FFF 
30 LOAD "monitor.obj" 

40 r*(0)="R0M":r$(l)="RAM" 

50 MODE 2 

60 PRINT "MONITOR LECTURA R 0 M / R A M " 
70 INPUT "Dirección inicial : 8<",a$ 

BO adr=8<A007! GOSUB 220 

90 INPUT "Dirección Final : S(",a» 

100 ADR=Í<A009: GOSUB 220 
lio p=VP0S«>0) 

120 PRINT "Sistema operativo :";r$(betrsta);CHR*(13) 

130 a$=INKEY$: IF a$="" THEN 130 

140 IF a* O CHR$(13) THEN betrsta=betrsta XOR 1; GOTO 120 
ELSE PRINT 

150 PRINT "BASIC :";r«(basista);CHR$<13); 

160 a$=INKEY$: IF a$="" THEN 160 

170 IF a$ O CHR$(13) THEN basista=ba5ista XOR 1: GOTO 150 
ELSE PRINT 

180 status=S(Xl 1111100 OR basistat2 OR betrsta 

190 POKE Í<A006,status 

200 CALL íiAOOO 

210 GOTO 70 

220 a=VAL("!<"+a*) 

230 IF a < 0 THEN a=a+2''16 
240 ah=INT(a/256): POKE adr+l,ah 
250 POKE adr,a-ah»256 
260 RETURN 


Al seleccionar el estado se mantiene el estado indicado pulsando 
la tecla ENTER. Pulsando cualquier otra tecla, el estado se 
altera. Ahora podemos comenzar "el viaje por el Firmware". 
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Arranque el programa introduciendo lo siguiente: 


Dirección inicial: ?(CCOO 
Dirección -final : JiCEOO 
Sistema operativo : ROM 

BASIC : ROM 


»ENTER» 

»ENTER» 

*ENTER» 

*ENTER» 


Introduzcan las mismas direcciones alterando el estado del área 
BASIC para el RAM y obtendrán en lugar de los mensajes de error 
del ordenador <que se encuentran en el ROM), solamente el Hex-Dump 
del área de pantalla (RAM). 

A partir de t660 (ROM) se encuentra el mensaje de puesta en marcha 
del ordenador. En el BASIC ROM se encuentra a partir de !<E380 la 
lista de los comandos BASIC utilizados por el intérprete. 

Observen los contenidos de ROM y RAM para tener una idea de la 
distribución de memoria. 

La gran mayoría del contenido del ROM pertenece a programas. 
Confeccione ahora una rutina con el comando RST !<1B que transfiera 
el contenido de una posición de memoria ROM a un programa BASIC e 
incorpórela luego en el disassembler en la subrutina a partir de 
línea 940. Tendrá entonces la posibilidad de traducir los 
programas del ROM. Para comprender mejor las rutinas internas 
resulta muy útil un listado ROM comentado. 


EL BREAKPOINT 


Explicamos a continuación la forma de confeccionar un programa de 
comprobación de programas en lenguaje máquina. Alguna vez 
seguramente ha sufrido una "caída" del sistema, sin saber la razón 
de la misma. Un programa máquina no visualiza ningún mensaje de 
error sino que simplemente paraliza el ordenador por condiciones 
de error. No es posible la reconstrucción del procedimiento del 
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error y sería de gran utilidad poder interrumpir un programa en 
cualquier posición para visualizar los contenidos de registros. 
Mediante esta in-formación pueden detectarse los errores. Para ello 
utilizamos el comando RST !<30. Este RESTAR! no lo utiliza el 
sistema operativo, quedando a nuestra disposición. Los restantes 
comandos RESTAR! no deben en ningún caso utilizarse porque 
realizan tareas propias del sistema operativo. El comando RST S(30 
tiene el código ScF?. En la posición donde se desea interrumpir el 
programa se introduce el código !<F7 mediante POKE. A través del 
código de comando ?<F7 el programa se interrumpe, por ello el 
nombre ’Breakpoint’. A continuación se arranca el programa a 
comprobar y si encuentra el comando RST ?<30 se produce una 
bifurcación de subrutina a dirección !<30. En esta dirección 
introducimos un comando JP que bifurca a la rutina de salida de 
registros. El siguiente listado de ensamblador se autodocumenta. 

Listado de ensamblador; 


AOOO 


10 

ORG 

S(A500 



A500 


20 




Activar Breakpoint 

A500 

3EC3 

30 

LD 

A, 8<C3 


Codigo para JP 

A502 

323000 

40 

LD 

(!<0030) ,A 


Después ?í30 (RST) 1 

A505 

210000 

50 

LD 

HL,REDUMP 


Dir. inicial reg-Dump 

A508 

223100 

60 

LD 

(?<0031) ,HL; 

Después S(31/S<32 

A50B 

C9 

70 

RET 


5 

Activar final 

A50C 


80 



<1 

Reg-Dump 


Linea 50 

: REDUMP=!<A50C 




A50C 

F5 

90 REDUMP 

PUSH 

AF 

a 

5 

Registro 

A50D 

C5 

100 

PUSH 

BC 

5 

almacenar en Stack 

A50E 

D5 

lio 

PUSH 

DE 



A50F 

E5 

120 

PUSH 

HL 



ASIO 

210000 

130 

LD 

HL,0 


calcular contenido 

A513 

39 

140 

ADD 

HL,SP 


original SP 

A514 

llOAOO 

150 

LD 

DE, 10 


y almacenarlo 

A517 

19 

160 

ADD 

HL,DE 


en el Stack 

A518 

E5 

170 

PUSH 

HL 



A519 

060C 

180 

LD 

B, 12 


Nros. bytes a vis. 
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A51B 


190 



; Salida en el orden 

A51B 


200 



; PC AF BC DE HL SP 

A51B 

2B 

210 PRNT 

DEC 

HL 


A51C 

7E 

220 

LD 

A,(HL) 

; E;;traer byte de Stack 

A51D 

CDOOOO 

230 

CALL 

AUSHEX 

; y visual i carlo 

A520 

10F9 

240 

DJNZ 

PRNT 


A522 

El 

250 

POP 

HL 

; Extr. SP anterior 

A523 

El 

260 

POP 

HL 

; extraer 

A524 

DI 

270 

POP 

DE 

; restantes 

A525 

C1 

280 

POP 

BC 

: registres 

A526 

F1 

290 

POP 

AF 

; del Stack 

A527 

DDEl 

300 

POP 

IX 

; Extraer dirección ret 

A529 

C9 

310 

RET 


; Retorno al BASIC 



RUTINA 

SALHEX 




Programa iBREAKPOI 

Start : ?<rt500 Ende : «<A529 

Longitud : 002A 

0 Error 


Tabla de variables ; 

REDUMP A50C PRNT A51B 


Naturalmente debe agregarse la rutina SALHEX. 

Mediante CALL !<A500 se almacena la dirección inicial de la rutina 
Dump-Registros a través del comando JP a partir de dirección S<30. 
De esta manera se dispone del comando RST S<30 para comprobar 
programas. Prueben el siguiente programa después de CALL ?<500: 
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10 ’ ORG !<AOOO 
20 ’ LD A, 1 
30 ’ LD BC,!<0203 
40 ’ LD DE,Í<0405 
50 ’ LD HL,!<0607 
60 ’ RET 
70 ■’ END 


Después de la traducción arranque el programa con CALL SíAOOO. Los 
registros deberían cargarse con los valores 1 a 7. Para 
comprobarlo utilizamos en lugar del comando RET el comando RST 
SiF7! 

POKE S(A00B,?íF7 

Introduzcan ahora CALL !<A000 y obtendrán el resultado siguiente: 


AOOC 0168 0203 0405 0607 BFF8 

Los primeros 2 bytes representan el contenido de PC, después de la 
interrupción (la interrupción se produjo en dirección ?<A00B). A 
continuación tenemos el ACU (=1). El siguiente es el registro de 
•f lags: 

S<68=?<X 0 110 10 0 0 

S 2 H P/V N C 

A continuación los registros B, C, D, E, H y L. 

Las últimas 4 ci-fras representan el contenido de SP antes de la 
interrupción. 

Tengan en cuenta que el Breakpoint (el código ?íF 7, es decir RST 
!<30) con esta rutina debe encontrarse únicamente en el nivel 
superior del programa. Si se encontrara en una subrutina no se 
produciría el retorno correcto al BASIC, porque se extrae 
únicamente una dirección de retorno del stack mediante POP IX. 
Elaborando el principio de esta rutina es posible confeccionar 
utilidades de programación como por ejemplo un simulador de paso a 
paso. Buenos paquetes de programas contienen tales programas de 
comprobación. 
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RUTINA BUSQUEDA 


Para 

completar 

la colección de 

rutinas de 

1 MONITOR, continuamos con 

una 

rutina que busca en 

la memoria por una secuencia determinada 

de caracteres 

. Si se 

quiere asimismo 

buscar en el ROM, debe 

hacerse como en la rutina MONITOR utilizando un comando FAR CALL 

S(18. 

La rutina 

SALHEX también i 

Jebe integrarse. 

AOOO 


10 



; BUSQUEDA 

AOOO 


20 

ORG 

!<A000 


AOOO 


30 F'RINT 

EQU 

!<BB5A 


AOOO 


40 START 

DS 

n 


A002 


50 ENDE 

DS 

2 


A004 


60 LONG 

DS 

1 

; Long. sec. caracteres 

A005 


70 TABl 

DS 

1 

; Inicio secuencia car. 

A006 


80 TAB2 

DS 

19 

; Reserva max. 20 car. 

A019 


90 



; Inicio búsqueda 

A019 

3A05A0 

100 

LD 

A, (TABl) 

; Primer elemento 

AOIC 

ED5B00A0 

lio 

LD 

DE,(START) 

; Inicio bloque 

A020 

2A02A0 

120 

LD 

HL,(ENDE) 

; Final bloque 

A023 

B7 

130 

OR 

A 

¡ Carry=0 

A024 

ED52 

140 

SBC 

HL,DE 

; Long. bloque 

A026 

23 

150 

INC 

HL 

; Después BC 

A027 

44 

160 

LD 

B.H 

; Cargar 

A028 

4D 

170 

LD 

C,L 


A029 

EB 

180 

EX 

DE,HL 

; Inicio después HL 

A02A 

EDBl 

190 COMP 

CPIR 


; Busca hasta 

A02C 

CCOOOO 

200 

CALL 

Z,FOUND 

¡ igualdad = > FOUND 

A02F 

EO 

210 

RET 

PO 

; RET por -fin busca 

A030 

18F8 

220 

JR 

COMP 


ttt% 

Linea 200 

: FOUND = 

!<A032 



A032 

F5 

230 FOUND 

PUSH 

AF 


A033 

C5 

240 

PUSH 

BC 


A034 

E5 

250 

PUSH 

HL 


A035 

3A04A0 

260 

LD 

A,(LONG) 


A038 

4F 

270 

LD 

C,A 

; Almacena longitud 
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A03? 

0600 

280 

LD 

B,0 

9 

en BC 

A03B 

OD 

290 

DEC 

C 

5 

compara desde 2do ele. 

A03C 

28FE 

300 

JR 

Z,OK 



A03E 

1106A0 

310 

LD 

DE,(TAB2) 


Dir. 2do elemento 

A041 

lA 

320 COMF'l 

LD 

A, (DE) 

5 

siguiente elemento 

A042 

EDAl 

330 

CPI 


5 

Comparar 

A044 

13 

340 

INC 

DE 


Incrementa apuntador 

A045 

20FE 

350 

JR 

NZ,RUECK 


Desigual = > CPIR 

A047 

EA42A0 

360 

JP 

PEjCOMPl 

? 

Seguir si BC no 0 

**** 

Linea 300 

: 0K=?<A04B 




A04A 

El 

370 OK 

POP 

HL 


Dir. sec. encontrada+1 

A04B 

2B 

380 

DEC 

HL 



A04C 

7C 

390 

LD 

A,H 


Highbyte 

A04D 

CDOOOO 

400 

CALL 

SALHEX 

5 

Salida 

A04E 

7D 

410 

LD 

A,1 

5 

Low-byte 

A051 

CDOOOO 

420 

CALL 

SALHEX 


Salida 

A054 

3E20 

430 

LD 

A,32 


Espacio en blanco 

A056 

CD5ABB 

440 

CALL 

PRINT 


Salida 

A059 


450 

INC 

HL 

5 

Restaurar valor anter. 

A05A 

C1 

460 

POP 

BC 



A05B 

F1 

470 

POP 

AF 



A05C 

C9 

480 

RET 


5 

Seguir búsqueda 

t**t 

Linea 350 

: RUECK = 

!<A05E 




A05D 

El 

490 RUECK 

POP 

HL 

<1 

No igual 

A05E 

C1 

500 

POP 

BC 



A05F 

F1 

510 

POP 

AF 



A060 

C9 

520 

RET 


11 

continuar búsqueda 


RUTINA SALHEX 
Programa : BUSCAR 

Start: í<AOOO Ende : Í<A061 

Longitud : 0062 
0 Error 
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Tabla de variables; 


PRINT 

BB5A 

START 

AOOO 

ENDE 

A002 

LONG 

A004 

TABl 

A005 

TAB2 

A006 

COMP 

A02A 

FOUND 

A032 

COMPl 

A042 

OK 

A04B 

RUECK 

A05E 




La secuencia a buscar debe almacenarse antes de la llamada a la 
rutina en la dirección ?<A005 mediante CALL !<A019. Esto y el pokear 
la longitud de la dirección inicial y -final se realiza a través de 
un programa BASIC. 


ENTRADA DE DATOS 

Hasta ahora hemos conocido rutinas del sistema que permiten la 
salida de lenguaje máquina. Ahora nos ocuparemos de la entrada de 
datos. Datos variables, como dirección inicial y -final hemos 
transferido al programa máquina de forma laboriosa mediante 
comandos POKE desde el BASIC. 

El BASIC del CPC nos ofrece la posibilidad de transferir datos 
mediante un comando CALL. Con este comando es posible la 
transferencia de hasta 32 números de 2 bytes. El comando CALL 
ampliado tiene el siguiente formato: 


CALL Di receión,Expresión,Expresión. 

Expresión puede representar cualquier número de 16 bits, una 
función o una variable cuyo valor corresponda a un número de 16 
bits. Dado que pueden transferirse hasta 32 números, no existe la 
posibilidad de almacenarlos todos en los registros. Los números 
transferidos se almacenan en el stack. El ACU contiene la cantidad 
de expresiones transferidas. El registro DE contiene el último 
valor indicado. La dirección del stack en la cual se encuentra la 
última entrada de los números transferidos, se transfiere a través 
del registro IX. El registro C contiene el estado ROM/RAM (ver FAR 
CALL RST StlS), el mismo en la llamada estándard siempre es StFF 
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(RAM seleccionados). HL siempre apunta a la dirección en la cual 
termina el comando CALL. Resumiendo; 


Registro No hay transferencia Transferencia de 

de números N números 


A 

F 

B 

C 

DE 

HL 

IX 


F=í<68 (2=1) 

S<20 

!<FF (estado) 
Dirección destino 
bifurcación 


n (Cantidad) 
F=S<28 (2=0!) 
«<20-n 
ííFF 

último nro. 
transferido 


Dirección final comando CALL 

Dirección Stack Dirección stack del 

!<BFFE último elemento 

=!<BFFE-2»n 


Utilicemos esta manera de entrada para alimentar el programa 
MONITOR con los valores correspondientes. Se deben transferir: 

La dirección inicial 

La dirección final 

El estado RAM/ROM (FAR CALL) 

La llamada tiene el formato siguiente: 

CALL &A000, Dirección inicial, Dir. final, estado 

Las modificaciones de programa son las siguientes: 

10 ’ ORG ííAOOO 

15 ’ CP 3 ; 3 Parametros 

20 ’ RET N2 ; No, final 
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En primer lugar se comprueba si se han entrado 3 valores (A=3). De 
lo contrario se produce un retorno al BASIC. 

25 ’ LD A,D 

30 ’ OR A 

35 ’ RET N2 

40 ’ LD A,E 

45 ’ LD (STATUS),A 

En las líneas 25, 30 y 35 se comprueba si D=0. Si D es di-ferente 
de 0 finaliza el programa. El estado es un número de 1 b/te. 
Pueden entrarse asimismo números de 2 bytes. Por esta razón ha de 
comprobarse si el segundo byte, el high byte es igual a cero. En 
las líneas 40 y 45 se almacena el estado introducido en la 
posición correcta para el comando RST üdS. 


50 ’ 

LD 

E,(IX+2) 



55 ’ 

LD 

D,(IX+3) 



60 ’ 

LD 

L,(IX+4) 



65 ’ 

LD 

H,(IX+5) 



En 

las líneas 50 y 55 se carga la dirección final transferida 

DE. 

En lineas 60 y 65 se 

almacena la dirección inicial en HL. 

70 ’ 

RST 

8<18 



75 ’ 


DW Vektor 



80 ’ 


RET 

5 

Retorno al BASIC 

85 

’VEKTOR 

DW MONITO 

5 

Dirección vector bifurcación 

90 

’STATUS 

DS 1 


Estado RDM/RAM 

95 

'ENDE 

DS 2 



100 

'MONITO 

LD (ENDE), 

DE 



el resto ya lo conocen 


Después de la traducción del programa completo puede lograr por 
ejemplo con 

CALL 8<A000, !<CC50, &CE60,252 
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que se visualice el mensaje de error del ROM BASIC. 

Otra rutina importante es la utilizada para la entrada de una 
tecla. Después de la llamada de 8(PB06 el ordenador espera hasta 
que se pulse una tecla. El valor de la tecla pulsada se refleja en 
el ACU. 

Con la siguiente rutina simple podemos realizar una entrada simple 
a través del teclado. 


AOOO 


10 


ORO 

!<A000 


AOOO 


20 

GET 

EQU 

!<BB06 


AOOO 


30 

PRINT 

EOU 

8<BB5A 


AOOO 

CD06BB 

40 

EIN 

CALL 

GET 


A003 

CD5ABB 

50 


CALL 

PRINT 


A006 

FEOD 

60 


CP 

13 

; Enter ??? 

A008 

20F6 

70 


JR 

NZ,EIN 


AOOA 

3E0A 

80 


LD 

A, 10 


AOOC 

CD5ABB 

90 


CALL 

PRINT 

: Avance linea 

AOOF 

C9 

100 


RET 




Programa: entrada 

Start: !<A000 Ende: S<AOOF 

Longitud: 0010 
0 Errores 
Tabla de variables 

6ET BB06 PRINT BB5A EIN AOOO 

Nota: En este tipo de entrada funcionan todos los caracteres de 
control CTRL, por ejemplo CTRL L para borrar la pantalla o CTRL 6 
para que se escuche el timbre. 

AMPLIACION DE COMANDOS CON RSX 

La ampliación del conjunto de comandos del BASIC del CPC puede 
ampliarse de diferentes formas. Solamente en el 464 pueden 
ampliarse las rutinas presentes en el ROM del BASIC mediante 
"áreas de parcheo" en el RAM. Esta posibilidad tiene sus 
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restricciones dado que solamente pueden e-fectuarse 9 parches. En 
el caso del CPC 6128/664 ello no es posible por falta de espacio. 
Sin embargo en todos los CPC existe el método estándard que 
facilita la ampliación con algunos comandos, y que se utiliza en 
todos los comandos de diskette AMSOOS. 

Seguramente alguna vez ha llamado la modalidad CPM mediante t>CPMt 
si posee un dispositivo de diskette. El comando CPM comienza con 
("ñ"). Al introducir "CPM" (sin raya) se obtiene un "Syntax 
Error". Si trabaja sin floppy (posibilidad para 464) se obtiene 
después de tñCPM» un "Unknown Command Error". 

Se trata de un comando que solamente es válido si hay un floppy 
conectado y por ello representa una ampliación. 

El símbolo "ñ" indica al sistema que a continuación hay un comando 
ampliado. En los ordenadores CPC existe un método especial que 
permite reconocer y ejecutar de entrada posibles comandos 
ampliados. Este método de incorporación de comandos se llama RSX. 
RSX ("Resident System Extention") significa ampliación fija del 
sistema, es decir que el RSX ha sido pensado para la incorporación 
de nuevos comandos residentes en ROMs adicionales (R(DMs de 
expansión). Para el trabajo con el floppy existe un ROM de 
expansión que incorpora asimismo los comandos ñCPM, ñERA, etc. 

El método RSX puede asimismo utilizarse para incorporar rutinas 
propias como verdaderos comandos y utilizarlos con comodidad. 

Explicaremos a continuación el método RSX con el siguiente ejemplo 
del comando DOKE. 

DOKE es casi un "Doble comando POKE". Con IPOKE» puede 
almacenarse un valor entre 0 y 255 en una posición de memoria. 
DOKE almacena un valor entre 0 y 65500 en 2 posiciones 
consecutivas de memoria. Para ello el valor se descompone en Low- 
byte y High-byte, donde el Low-byte se almacena en la posición 
inferior de memoria y el High-byte en la posición de memoria con 
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dirección superior. Con DOKE se simpli-fica la modi-ficación de 
muchos parámetros del sistema almacenados en el RAM (usualmente 
como PEEKs y POKEs). 

La transferencia de parámetros en el caso de los comandos RSX 
•funciona de -forma análoga a la del comando CALL. 

El comando DOKE necesita 2 parámetros: 

La dirección a partir de la cual se desea almacenar el valor y el 
valor que se desea almacenar a partir de esta dirección. El 
comando tiene el siguiente -formato: 

ñDOKE, Direcc 1 ón,Valor 

Los parámetros se trans-fieren de la siguiente -forma: 

A: Contiene la cantidad de los parámetros transferidos. 

Flags: Zero Flag = 1 si no se transfieren parámetros, de lo 

contrario cero. 


B: Contiene 32-cantidad de parámetros. 

DE: Contiene último parámetro transferido. 

IX: Dirección del último elemento. El penúltimo parámetro se 
encuentra entonces en dirección IX-^2, el siguiente en 
dirección IX-*-4, etc. 


La rutina DOKE es la siguiente: 


100 ’ 

LD 

L, ilX+2) 

lio ’ 

LD 

H,(IX+3) 

120 ' 

LD 

(HL) ,E 

130 ’ 

INC 

HL 

140 ’ 

LD 

(HL),D 

150 •’ 

RET 



Dirección transferida 

cargada en registro HL 

Almacenar Low-byte 

Incrementar dirección a High-byte 

Almacenar High-byte 

Final 
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Con CALL !<A000, dirección, valor podemos llamar el comando DOKE 
después de ensamblar la rutina, suponiendo que éste se ha 
almacenado previamente a partir de í<A000. Pruebe usted por 
ejemplo; 

CALL ?<A000,. 

De esta -forma tenemos una rutina DOKE. Nos molesta únicamente la 
llamada mediante CALL. DOKE debería llamarse mediante DOKE y para 
ello debemos con-f eccionar una pequeña rutina de adaptación. 
Utilizamos para ello la rutina "Loge>;t" del sistema operativo que 
se ocupa de la expansión. Solamente hemos de transferir algunos 
valores al Logext. 

Para incorporar el DOKE, el sistema necesita "saber" lo siguiente: 

1) Nombre de la ampliación. 

2) Dirección de la rutina 

3) Dirección de 4 bytes no utilizados que se utilizan internamente 
para la administración de la rutina. 

La dirección de los 4 bytes del sistema se cargará en el registro 
HL antes de la llamada de Logext. Se carga también BC con la 
dirección inicial de una tabla en la cual se encuentran más 
informaciones. 

Esta tabla contiene en primer lugar la dirección de una segunda 
tabla que contiene el nombre o varios nombres de diferentes 
rutinas que deben incorporarse. El segundo elemento de la primera 
tabla contiene un comando de bifurcación a la rutina o las rutinas 
a incorporar. Si se incorporan varias rutinas, los comandos de 
bifurcación han de corresponderse con los nombres de las rutinas. 

Como ya hemos dicho la segunda tabla contiene los nombres de las 
rutinas. Para poder diferenciar los diversos nombres, el bit 7 de 
la última letra del nombre debe estar activado permanentemente. 
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Veamos nuestro ejemplo: 


10 ’ 

LD BC,RSXTAB 


Dirección Ira. tabla 

20 ’ 

LD HL,SYSBYT 


Dirección byte del sistema 

30 ’ 

CALL SiBCDl 


Llamar rutina Logext 

40 ’ 

RET 


Incorporación -finalizada 

50 ’ 

RSXTAB DW NAMTAB 

; Tabla 1 Ira dir. = dir. inicial tabla 2 

60 ’ 

JP START 

5 

Comandos bifurcación a la rutina 

70 ’ 

NAMTAB DM "DOK" 


1 Tabla de nombres 

80 ' 

DB ?<25 

5 

=ASC("E")-t-128 activa bit 7 

90 ’ 

DB 0 

9 

Nuil Byte marca final tabla nombres 

95 ’ 

SYSBYT DS 4 

5 

Reserva 4 bytes internos 

100 

’ START LD . 

• 

; Aquí comienza la rutina 


Una vez ensamblado el programa (o el cargador BASIC) se incorpora 
el comando DOKE con CALL SiAOOO. A partir de este momento el DOKE 
es una ampliación de comandos (RSX), es decir el comando puede 
utilizarse como cualquier otro comando en modalidad directa o en 
un programa. 

El nuevo comando tiene el siguiente -formato: 

DOKE Dirección, Valor 

Observen que esta rutina sólo es necesario llamarla una Cínica vez. 
Los 4 bytes del sistema se utilizan entre otras cosas para apuntar 
eventualmente a otras tablas RSX. Si la misma rutina se inicializa 
por segunda vez, el apuntador que debe indicar la siguiente tabla 
RSX señalará lógicamente a la misma tabla. 

Por ello puede ocurrir que el reconocimiento del comando quede 
clavado en un bucle sin -fin, cosa muy inoportuna. El siguiente 
programa evita que se produzca una segunda llamada grabando el 
comando RET en el comienzo de la rutina INIT. 
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AOOO 

010000 

10 INIT 

LD 

A003 

210000 

20 

LD 

A006 

CDDIBC 

30 

CALL 

A009 

3EC9 

40 

LD 

AOOB 

3200A0 

50 

LD 

AOOE 

C9 

60 

RET 

**** 

Línea 10 

: RSXTAB=?<AOOF 

AOOF 

0000 

70 RSXTAB 

DW 

Aon 

C30000 

80 

JP 

t*** 

Línea 70 

: NAMTAB=S<A014 

A014 

444F4B 

90 NAMTAB 

DM 

A017 

C5 

100 

DB 

A018 

00 

lio 

DB 

t**t 

Línea 20 

: SYSBYT=S<A019 

A019 


120 SYSBYT 

DS 

tu* 

Línea 80 

: START=&A01D 

AOID 

DD6E02 

130 START 

LD 

A020 

DD6603 

140 

LD 

A023 

73 

150 

LD 

A024 


160 

INC 

A025 

72 

170 

LD 

A026 

C9 

ISO 

RET 


Programa: DOKE 

Start: !(AOOO 

Longitud: 0027 

0 Errores 

Ende: 

Tabla de variables 



INIT AOOO RSXTAB AOOF 
START AOID 


BC,RSXTAB 
HL.SYSBYT 
S<BCD1 
A,S<C9 
(INIT).A 


NAMTAB 

START 

"DOK" 

í<05 

O 

4 

L,(IX+2) 
H,(IX+3) 
(HL),E 
HL 

(HL),D 


Í<A026 


NAMTAB A014 SYSBYT A019 
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Otro ejemplo para una rutina RSX incorporada ya la hemos visto en 
relación con el desensamblador. El siguiente listado ensamblador 
refleja exactamente este comando incorporado en el programa 
mencionado. 

Una nueva posibilidad de este programa consiste en que pueden 
asimismo traspasarse valores desde el programa máquina al BASIC. 
Para ello se utiliza la función de apuntador de variables C". 

Este símbolo (A de arrobas), representa una función que hasta 
el momento no se ha mencionado en ningún manual del CPC. Para 
poder comprender y aplicar correctamente esta función, hemos de 
ocuparnos un poco del almacenamiento interno de las variables (Jel 
BASIC. 

Existen tres modalidades diferentes de la representación de datos 
en el ordenador: 

1. Integer INT - Número entero 

2. Real REL - Número decimal con coma 

3. Strings STR - Alfanumérico 

La primera modalidad, la representación de números enteros ya la 
hemos visto. Un número entero se descompone en Low-byte y High- 
byte. El bit 7 del High-byte se utiliza como identificación de 
signo (+/-). Cero significa número positivo y uno número negativo. 
Los números negativos se representan en el complemento de 2, es 
decir el valor del número se complementa y se le suma 1 (vean 
capítulo 4.6, comandos aritméticos). De esta forma las variables 
enteras o constantes enteras pueden obtener valores enteros entre 
-32768 y +32767. 
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Decimal Binario 


He:: adecimal 


•32768 

1 

000 

0000 

0000 

0000 

80 

00 

•32767 

1 

000 

0000 

0000 

0001 

80 

01 

•32766 

1 

000 

0000 

0000 

0010 

80 

02 

■32765 

1 

000 

0000 

0000 

0011 

80 

03 


1 

111 

lili 

lili 

1110 

FF 

FE 

-1 

1 

111 

lili 

lili 

lili 

FF 

FF 

0 

0 

000 

0000 

0000 

0000 

00 

00 

1 

0 

000 

0000 

0000 

0001 

00 

01 

o 

0 

000 

0000 

0000 

0010 

00 

02 

32766 

0 

111 

lili 

lili 

1110 

7F 

FE 

Z27b7 

0 

111 

lili 

lili 

lili 

7F 

FF 


La ■función @ indica la dirección en la cual se almacena el valor 
de una variable. En el caso de variables enteras es la dirección 
del Low-byte. Prueben ahora lo siguiente: 

* W/.=«<1234: POKE @W/.,J<56: PRINT HEX$(W/.) * nos da S<1256. 

De esta manera pueden comunicarse valores desde el programa 
máquina al BASIC, transfiriendo los apuntadores de la variable en 
el momento de la llamada de la rutina. El programa máquina 
almacena el valor a comunicar, en esta dirección. Después del 
retorno al BASIC el valor queda disponible en la variable 
correspondiente. Ofrecemos a continuación el listado de 
ensamblador del comando RPEEK que realiza un retorno del valor de 
la forma expuesta. 
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AOOO 


10 


; RPEEK 

AOOO 


20 


; Comando RSX 

AOOO 


30 


; Formato: "ñRF'EEK, variable 



trans-ferencia(INT),direccion,estado ROM/RAM 

9F20 


40 

ORG 

S<9F20 

9F20 


50 


; CPC 6128 ; 464, 664 

9F20 


60 OPMIS 

EQU 

!.;D055 ; ?<CFED, ?<D058 

9F20 


70 IMF'ARG 

EQU 

!!C21D ; !(C205, S<CB50 

9F20 

010000 

80 INIT 

LD 

BC,RSXTAB 

9F23 

210000 

90 

LD 

HL,SYSBYT 

9F26 

CDDIDC 

100 

CALL 

&BCD1 ; Logext 

9F29 

3EG9 

lio 

LD 

A,?<C9 

9F2B 

32209F 

120 

LD 

(INIT),A 

9F2E 

C9 

130 

RET 


**»* 

Línea 80 i 

; RSXTAB !<9F2F 


9F2F 

0000 

140 RSXTAB 

DN 

NAMTAB 

9F31 

C30000 

150 

JR 

START 

t*** 

Línea 140 

: NAMTAB = 

?<9F34 


9F34 

52504545 

160 NAMTAB 

DM 

"RPEE" 

9F38 

CB 

170 

DB 

JíCB 

9F39 

00 

180 

DB 

0 

t*** 

Línea 90 

: SYSBYT = 

?<9F3A 


9F3A 


190 SYSBYT 

DS 

4 

tÜIll!» 

Línea 150 

: START = 8<9F3E 


9F3E 

DF 

200 START 

RST 

?¡18 ; Por las rutinas de error 

9F3F 

0000 

210 

DW 

VEKTOl ; Bifurcación por Far Cali 

9F41 

C9 

220 

RET 

; Con Upper ROM activado 

tttt 

Línea 210 

: VEKTOl = 

?<9F42 


9F42 

0000 

230 VEKTOl 

DW 

ANFANG 

9F44 

FD 

240 

DB 

253 

tttt 

Línea 230 

: ANFANG = 

{<9F45 


9F45 

FE03 

250 ANFANG 

CP 

3 ; 2 Parametros? 

9F47 

C255D0 

260 

JP 

NZ,OPMIS ; No, falta operando 

9F4A 

7A 

270 

LD 

A,D 

9F4B 

FEOO 

280 

CP 

0 

9F4D 

C21DC2 

290 

JP 

NZ,IMPARG ; Estado sup.255, error 

9F50 

7B 

300 

LD 

A,E 
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9F51 

320000 

310 


LD 

(STATUS),A 

9 

Estado Far Cali 

9F54 

DD6E02 

320 


LD 

L,(IX+2) 


Dirección Low 

9F57 

DD6603 

330 


LD 

H,(IX+3) 

J 

Dirección High 

9F5A 

DF 

340 


RST 

?<18 

■ 

Bi+urcar rutina 

9F5B 

0000 

350 


DM 

VEKT02 

9 

Leer byte 

9F5D 

DD6E04 

360 


LD 

L,(IX+4) 

• 

9 

Leer apuntador 

9F60 

DD6605 

0*7 0 


LD 

H,(IX+5) 

9 

variable INT 

9F63 

77 

380 


LD 

(HL),A 

9 

Trasp. val. a var 

9F64 

97 

390 


SUB 

A 



9F65 

23 

400 


INC 

HL 

9 

High byte var.=0 

9F.66 

77 

410 


LD 

(HL),A 



9F67 

C9 

420 


RET 




t*** 

Línea 350 

: VEKT02 = 

?<9F68 




9F68 

0000 

430 

VEKT02 

DM 

REDBYT 



Utt 

Línea 310 

: STATUS = 

S<9F6A 




9F6A 

FD 

440 

STATUS 

DB 

253 



tnt 

Línea 430 

! REDBYT = 

!<9F6B 




9F6B 

7E 

450 

REDBYT 

LD 

A,(HL) 

9 

Leer rutina 

9F6C 

C9 

460 


RET 





End Assumed 


Program : RPEEK 

Start : Í<9F20 End : !<9F6C 

Longitud : 004D 
0 Errores 


Tabla de Variables 


DPMIS 

D055 

IMPARG 

C21D 

INIT 

9F20 

RSXTAB 

9F2F 

NAMTAB 

9F34 

SYSBYT 

9F3A 

START 

9F3E 

VEKTOl 

9F42 

ANFANG 

9F45 

VEKT02 

9F68 

STATUS 

9F6A 

REDBYT 

9F6B 
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Después de haber explicado la transferencia numérica nos 
dedicaremos ahora a otro tipo de variables, la variable de STRING. 

En un string se almacenan datos alfanuméricos, es decir caracteres 
como letras o cifras. Cada carácter tiene un código asignado. Los 
códigos de caracteres para los valores de 0 a 127 son los 
correspondientes al llamado American Standard Code for Information 
Interchange (ASCII). 

Para almacenar un carácter se necesita exactamente un bvte. Un 
"String" (ingles string: cadena), es una secuencia de códigos de 
caracteres consecutivos. Dado que un carácter corresponde a un 
byte, el string se almacena en secuencia consecutiva de posiciones 
de memoria en el RAM. Para asignar un string determinado a una 
determinada variable son necesarias 2 informaciones que componen 
el llamado "String Descriptor". 

1. La dirección de la primera posición de memoria que contiene el 
primer código de carácter del string. 

2. La longitud del string, es decir la cantidad de bytes que forma 
la cadena de caracteres. 


Estos 2 datos se almacenan junto con el nombre de la variable en 
el área de variables del BASIC. La cadena de caracteres en sí se 
encuentra en otra posición, que puede ser el mismo programa o un 
área de memoria reservada especialmente para strings. 

En BASIC podemos utilizar nuevamente la función para leer la 
dirección del string descriptor de una variable, que se compone de 
3 bytes: 


1. Byte : Longitud del string. 

2. y 3. Byte : Dirección inicial del string. 
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La -funciún proporciona la dirección del primer byte del string 
descriptor. 

Prueben el programa siguiente: 


10 X$ = "ZZZeichenkeTTTTe" 

20 AD = e(X$) 

30 LA = PEEK(AD) 

40 ST = PEEK(AD+1) + 256 * PEEK(AD+2) 

50 FOR I=ST TO ST+LA-1 
60 PRINT CHR$(PEEK(I)); 

70 NEXT 


El símbolo en relación con el tratamiento de strings ya ha 
sido utilizado en el programa generador de -fuentes. El programa 
máquina utilizado era capaz de convertir una línea BASIC entrada 
como string en una línea BASIC real. De esta manera se simula la 
entrada manual del string en modalidad directa. A continuación 
este string se traduce a una línea como en modalidad directa. 

La única restricción del siguiente programa es que la línea a 
generar debe tener un número de línea superior al actual, en caso 
contrario el programa no encontraría la posición correcta después 
del RET. 
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AOOO 


10 



; LINER 


AOOO 


20 



; Genera 

lineas BASIC 

AOOO 


30 



; 1. en 

modalidad directa 

AOOO 


40 



; 2. en 

programa, si numero linea 

AOOO 


50 



; mayor 

que actual 

AOOO 


60 



; A$ contenido de linea en ASCII 

AOOO 


70 



; -finali 

cada con Nuil Byte 

AOOO 


80 



5 


AOOO 


90 



; Formato: CALL !<AOOO,@A$ 

AOOO 


100 



5 


9FOO 


lio 


ORG 

?<9F00 


9F00 


120 



; CFC 6128; 464, 664 

9F00 


130 

CHRSKP 

EQU 

8<DE4D 

; S(DD61, Í<DE52 

9F00 


140 

TESTER 

EQU 

?<EECF 

i S<EE04, .?<EED4 

9F00 


150 

ASSEMB 

EQU 

?<E7A5 

; Í<E6C6, S<E7AA 

9F00 

DF 

160 


RST 

8<18 ; 

Far Cali 

9F01 

0000 

170 


DW 

VEKTOR ; 

Dado que BASIC ROM 

9F03 

C9 

180 


RET 


ha de estar activado 

t*** 

Línea 170 

! VEKTOR = 

?(9F04 



9F04 


190 

VEKTOR 

DW 

START 


9F06 

FD 

200 


DB 

253 ; 

Low ROM OFF Up ROM ON 

**** 

Línea 190 

: START = ?<9F07 



9F07 

EB 

210 

START 

EX 

DE,HL ; 

Dirección transí, a HL 

9F08 


220 


INC 

HL ; 

Sobreleer Long. string 

9F09 

5E 

230 


LD 

E, (HL) ; 

Low byte Direcc. string 

9F0A 

23 

240 


INC 

HL 


9F0B 

56 

250 


LD 

D, (HL) 

; High byte dir. string 

9F0C 

EB 

260 


EX 

DE,HL 

; Dirección string a HL 

9FOD 

CD4DDE 

270 


CALL 

CHRSKP 


9F10 

B7 

280 


OR 

A 


9F11 

CB 

290 


RET 

Z 
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9F12 CDCFEE 300 

CALL 

TESTER 


9F15 DO 310 

RET 

NC 


9Fi6 CDA5E7 320 

CALL 

ASSEMB 

; Traducir e insertar lin. 

; HL debe apuntar a primer 
; byte de la linea ASCII 

9F19 C9 330 

RET 


; Final 

Program : LINER 

Start : S;9F00 

Longitud : 001A 

0 Errores 

End : 

5!9F19 



Tabla de Variables 

CHRSKP DE4D TESTER EECF ASSEMB E7A5 VEKTOR 9F04 
START 9F07 
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A continuación o-frecemos el programa máquina incorporado en un 
programa, que genera un cargador BASIC de los programas 
residentes en la memoria en código objeto, y codificados en 
lenguaje máquina. 


Es muy útil para transferir programas máquina al sistema, incluso 
para quienes no posean un compilador Assembler. 
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10 MEMORY ?<9EFF 
20 LIN=?(9F00 

30 FOR I=LIN TO LIN+{<19 : REED A$ : W=yAL' 

40 S=S+W : POKE I,W : NEXT 

50 IF S O 4273 TREN PRINT "ERROR EN DATAS" : END 

51 ’ 464 : IF S O 4121 THEN . 

52 ’ 664 : IF S O ???? THEN. 


60 

PRINT 

"OK 

" : 

S= 

=0 





70 

DATA 

DF 

04, 

9F 

C9, 

07, 

9F 

,FD, 

EB 

80 

DATA 

23 

5E, 

23 

56, 

EB, 

CD 

,4D, 

DE 

81 

’464 : 







,61, 

DD 

82 

’664 : 







,52, 

DE 

90 

DATA 

B7 

C8, 

CD 

CF, 

EE, 

DO 

,CD, 

A5 

91 

’464 : 




04, 



1 9 

C6 

92 

’664 : 




98, 

EE, 


1 !> 

AA 

100 

1 DATA 

E7 

C9 







101 

’464: 

E6 

• a 








i 00*ts C./ f m • 

lio INPUT "DIRECCION INICIAL".ST 

120 INPUT "DIRECCION FINAL",EN 

130 AZí=CHR$(34) : REM Comillas 

140 NU$=CHR$(0)+CHR$<0) : REM Marca Final 

150 A$="1000 FOR I=Í<"+HEX$(ST,4)+" TO !<"+HEX$(EN,4)+NU* 

160 CALL LIN,@A$ 

170 Aí="1010 READ A$ ! W=VAL("+AZ$+"?(H"+AZ$+"+A$)"+NU* 

180 CALL LIN,@A$ 

190 A$=“1020 S=S+W ; POKE I,W : NEXT"+NU$ 

200 CALL LIN,@A$ 

210 Z=1050 
220 I=ST 
230 A$="" 

240 J=0 

250 W=PEEK(I+J) ; S=S+W 
260 A$=A$+HEX$(W,2)+"," 

270 IF I+J < EN THEN J=J+1 : IF J < 8 THEN 250 ELSE EF=-1 

280 A$=LEFT$(A$,LEN(A$)-1) 

290 A»=STR$(Z)+" DATA "+A$+NU» 

300 CALL LIN,@A* 

310 Z=Z+10 
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320 IR NOT EF TREN 1=1+8 : GOTO 230 

330 A$="1030 IF S O "+STR*(S)+" THEN PRINT "+AZ$+"ERR0R EN DATAS" 
+ AZ* + "! END" + NU* 

340 CALL LINjSA* 

350 A*="1040 PRINT "+AZ* + "OKI" + AZ* +" : END “ + NU* 

360 CALL LIN,@A* 

370 DELETE 10-380 
380 END 
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El programa de la página anterior ha sido el último del presente 
libro. Naturalmente hay muchas cosas más para explicar re-ferente a 
la programación práctica, pero es de gran importancia que usted 
mismo realice abundantes ejercicios. Aconsejamos la lectura del 
libro “Consejos y trucos del CPC" tomo 2, donde se ofrecen 
aplicaciones del lenguaje máquina, como por ejemplo el programa 
XREF con el cual se realiza la revisión general de las variables 
del Desensamblador/Simulador. 

Esperamos encuentren entretenida la programación en lenguaje 
máquina. 
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CAPITULO VII: PERSPECTIVAS 

Acaban de aprender las técnicas -fundamentales de programación, asi 
como los programas de ayuda para la con-fección de programas en 
lenguaje máquina. 

La programación en ensamblador es inevitable para resolver algunos 
problemas de programación. Los tiempos del desarrolo del so-ftware 
son sin duda mucho más largos que los de los programas 
con-feccionados con lenguajes de alto nivel. Por esta razón son 
necesarios buenos programas de desarrollo para la programación 
efectiva. 

Las propiedades de tales programas los discutiremos brevemente. Un 
paquete de programas para desarrollo de programas máquina debe 
incorporar por lo menos un programa assembler y un amplio programa 
monitor. 

El ensamblador es necesario para el desarrollo de programas 
voluminosos. Adicionalmente a los pseudo-comandos conocidos por 
ustedes, muchos ensambladores ofrecen la posibilidad de 
simplificar aún más el desarrollo de programas. Por ejemplo entre 
ellos cuenta la definición de macro-instrucciones, el ensamblaje 
condicionado y el acceso a programas o variables externas. 

MAGROS: 

Frecuentemente ocurre que una secuencia determinada de comandos se 
repite varias veces en un programa. Utilizando macros se evita la 
codificación repetida de la secuencia completa de instrucciones. 
Con la ayuda de una definición macro, puede darse un nombre a una 
secuencia utilizándolo en el programa fuente en lugar de la 
secuencia de comando. 

El ensamblador reemplaza el nombre de macro por la secuencia 
correspondiente. Los programas fuente resultan más cortos y más 
claros con la utilización de macros. 
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ENSAMBLAJE CONDICIONADO: 

Con el ensamblaje condicionado es posible traducir determinadas 
porciones del programa dependiendo de una condición. Es posible 
por ejemplo que un programa -fuente general pueda con-feccionarse 
como una administración de -ficheros, utilizándole a continuación 
para confeccionar aplicaciones diversas. 

PR06RAMAS Y VARIABLES EXTERNAS 

Al programar en ensamblador es de gran utilidad la técnica de 
programación estructurada, es decir que problemas grandes se 
subdividen en porciones reducidas, confeccionando cada porción de 
programa por sí mismo. Muchas veces se utilizan las mismas 
subrutinas, por ejemplo nosotros hemos utilizado la rutina para la 
salida heüadecimal de un carácter en programas diversos. Rutinas 
de este tipo que se utilizan con cierta frecuencia y variables que 
se requieren repetidas veces componen una bibioteca de 
programas/variables, en el caso de un ensamblador profesional. 

Las rutinas se reconocen por su nombre en el programa fuente y 
pueden cargarse automáticamente desde el cassette/diskette, para 
incorporarlos en el programa objeto. 

El programa que realiza la uni'ón de diferentes programas máquina 
se conoce como "LINKER" (link: inglés: une). Con el mismo se 
relaciona también un programa llamado "RELOCATOR" (reubicador), 
que se utiliza para corregir las direcciones que se modifican al 
introducir y desplazar módulos. Los programas que contienen 
también esta posibilidad son muy amplios pero relativamente caros. 
La programación en cambio se agiliza y se hace mucho más 
confortable. Muchos ensambladores poseen un editor propio, es 
decir, la entrada de comandos de ensamblador no necesita la 
numeración de línea, siendo ésta únicamente orientativa. 

Existen algunos programas adicionales de utilidad para el 
ensamblador. La mayoría de ellos se agrupan en un MONITOR. 

Las rutinas estándard de un MONITOR ya las hemos revisado. El 
disassembler en la mayoría de los casos se encuentra incorporado 
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en el programa MONITOR. 

Una particularidad importante de un programa MONITOR es la 
-facilidad que ofrece de comprobar programas. La posibilidad de 
incorporar un Breakpoint es el método más sencillo de 
comprobación. Rutinas ampliadas de comprobación se agrupan en un 
programa denominado DEBU6GER (depurador). El programa más 
importante es el simulador de paso a paso, similar a la función 
TRON del BASIC del CPC. 

El poseer buenos programas de utilidad para el desarrollo de 
software no lo es todo. Es mucho más importante el paso a la 
práctica de la programación. Este libro les ha facilitado las 
técnicas fundamentales necesarias para la programación del Z80. 
Sólo practicando podrán realmente aprender el lenguaje máquina. 
Les deseamos mucha suerte en la confección de sus propios 
programas !!! 
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ANEXO 


RUTINAS DE UTILIDAD DEL SISTEMA 


Dirección í<0000: RST 0: RESET 

Llamada con CALL 0. Actúa como Conectar/Desconectar (RESET). 
Dirección ?<0008 RST !(08- Low-Jump 

Bifurca a una dirección en el ROM del sistema operativo o al RAM 
solapado. Los bits 14 y 15 determinan la selección ROM/RAM. Un bit 
activado significa RAM y un bit desactivado ROM. bit 14 determina 
el área inferior de direcciones (?<0-!(3FFF) y bit 15 determina el 
área superior (?<C000-?<FFFF). 

Dirección !<000C: JP (HL) con selección ROM/RAM. 

Los bits 14 y 15 de HL tienen la misma función que en RST ?<08. 
Dirección ?<0010: RST MO: Side Cali 

Utilizado para la llamada de una rutina en el ROM de expansión. 

Dirección ?<0018: RST MS: Far Cali 

Utilizado para la llamada de una rutina del ROM o del RAM. (Ver 
capitulo ¿.2). 

Dirección í<0020; RST !<20: RAM-Lam 

El ACU se carga con el valor de la dirección a la cual apunta HL. 
En este caso queda siempre seleccionado el RAM. 


Dirección 


l<0028t RST S(28: Firm Jump 
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Utilizado para la llamada de una rutina en el sistema operativo 
(Firmware). La dirección se indica directamente a continuación del 
comando. 

Dirección !<0030: RST !<30: User Restart 

Reservado para programas del usuario. 

Dirección ÍíBB 06: KM(Key Manager)- Wait Char 

El código ASCII de la tecla pulsada se transfiere al ACU. 

Dirección !iBB24: KM - Set Joystick 

El registro H contiene el estado del joystick 1, el registro L el 
del joystick 2. 

Dirección JíBBSA: TXT Output 

Visualiza en la pantalla el valor del carácter contenido en el 
ACU. 

Dirección ?<BB6C! TXT Clear Window 

Borra la ventana actual de la pantalla. 

Dirección Í<BB75; TXT Set Cursor 

H/L corresponde a línea/columna. 


Dirección 

?<BB78! 

TXT 

Get Cursor 

Dirección 

^BBSl: 

TXT 

Cursor 

On 

Dirección 

S(BB84: 

TXT 

Cursor 

Qft 

Dirección 

?<BBC0: 

GRA 

Move Absolut 


El registro DE es la coordenada X, HL la coordenada Y. 
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Dirección S<BBC6: GRA Astc Cursor 

Ocupación de registro como en Move Absolut 

Dirección ?<BBEA: GRA Plot Absolut 

Dirección S<BC?B: CAS (/Disk) Cas Catalog 

Dirección ?<BCD1: KL (Kernel) Log Ext 

Incorpora ampliaciones RSX (ver capítulo 6.2). 

Dirección !iBD0D: KL Time Please 

Retorna el valor del Timer como valor de 4 bytes en DE y HL. 

Dirección !<BD10: KL Time Set 

Dirección ?<BD1C: MC (Machine) Set Screen Mode 

Inicializa la modalidad de pantalla con el valor del ACU. 

Dirección ÍíBD 2B: MC Print Char 

Retorna el valor del ACU a través de la impresora. 

Dirección &BD37s Jump Restore : "Freno de emergencia" 

Inicializa todos los vectores de bifurcación eventualmente 
"dañados" con sus valores iniciales. 
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TABLA DE CONVERSION 


decimal hex binario 


decimal hex 


0 

too 

1X00000000 

26 

HA 

1 

101 

1X00000001 

27 

11B 

2 

102 

1X00000010 

28 

lie 

3 

103 

1X00000011 

29 

11D 

i 

104 

1X00000100 

30 

HE 

5 

105 

1X00000101 

31 

11F 

6 

106 

1X00000110 

32 

120 

7 

107 

1X00000111 

33 

121 

8 

108 

1X00001000 

34 

122 

9 

109 

1X00001001 

35 

123 

10 

lOA 

1X00001010 

36 

124 

11 

lOB 

1X00001011 

37 

125 

12 

lOC 

1X00001100 

38 

126 

13 

too 

1X00001101 

39 

127 

U 

tOE 

1X00001110 

40 

128 

15 

lOF 

1X00001111 

41 

129 

16 

lio 

1X00010000 

42 

t2A 

17 

111 

1X00010001 

43 

12B 

18 

112 

1X00010010 

44 

12C 

19 

113 

1X00010011 

45 

120 

20 

114 

1X00010100 

46 

t2E 

21 

115 

1X00010101 

47 

t2F 

22 

116 

1X00010110 

48 

130 

23 

117 

1X00010111 

49 

U1 

24 

118 

1X00011000 

50 

132 

25 

119 

1X00011001 

51 

133 


binario 


SX00011010 
&X00011011 
&X00011100 
&X00011101 
1X00011110 
tXOOOlllll 
iXOOlOOOOO 
1X00100001 
1X00100010 
1X00100011 
1X00100100 
1X00100101 
1X00100110 
1X00100111 
1X00101000 
1X00101001 
1X00101010 
1X00101011 
1X00101100 
1X00101101 
1X00101110 
1X00101111 
1X00110000 
1X00110001 
1X00110010 
1X00110011 
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mal 

hex 

binario 

decimal 

hex 

binar: 

52 

&34 

£X00110100 

78 

£4E 

£X01001110 

53 

£35 

£X00110101 

79 

£4F 

£X01001111 

54 

£36 

£X00110110 

80 

£50 

£X01010000 

55 

£37 

£X00110111 

81 

£51 

£X01010001 

56 

£38 

£X00111000 

82 

£52 

£X01010010 

57 

£39 

£X00111001 

83 

£53 

£X01010011 

58 

£3A 

£X00111010 

84 

£54 

£X01010100 

59 

£36 

£X00111011 

85 

£55 

£X01010101 

60 

£3C 

£X00111100 

86 

£56 

£X01010110 

61 

£30 

£X00111101 

87 

£57 

£X01010111 

62 

£3E 

£X00111110 

88 

£58 

£X01011000 

63 

£3F 

£X00111111 

89 

£59 

£X01011001 

64 

£40 

£X01000000 

90 

£5A 

£X01011010 

65 

£41 

£X01000001 

91 

£56 

£X01011011 

66 

£42 

£X01000010 

92 

£5C 

£X01011100 

67 

£43 

£X01000011 

93 

£50 

£X01011101 

68 

£44 

£X01000100 

94 

£5E 

£X01011110 

69 

£45 

£X01000101 

95 

£5F 

£X01011111 

70 

£46 

£X01000110 

96 

£60 

£X01100000 

71 

£47 

£X01000111 

97 

£61 

£X01100001 

72 

£48 

£X01001000 

98 

£62 

£X01100010 

73 

£49 

£X01001001 

99 

£63 

£X01100011 

74 

t4A 

8X01001010 

100 

£64 

£X01100100 

75 

£48 

8X01001011 

101 

£65 

8X01100101 

76 

£4C 

8X01001100 

102 

£66 

8X01100110 

77 

£40 

8X01001101 

103 

£67 

8X01100111 
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decimal hex binario 

decimal 

hex 

binar 

104 

868 

8X01101000 

130 

882 

8X10000010 

105 

869 

8X01101001 

131 

883 

8X10000011 

106 

86A 

8X01101010 

132 

884 

8X10000100 

107 

868 

8X01101011 

133 

885 

8X10000101 

108 

86C 

8X01101100 

134 

886 

8X10000110 

109 

860 

8X01101101 

135 

887 

8X10000111 

110 

86£ 

8X01101110 

136 

888 

8X10001000 

111 

86F 

8X01101111 

137 

889 

8X10001001 

112 

870 

8X011100OC 

138 

88A 

8X10001010 

113 

871 

8X01110001 

139 

888 

8X10001011 

114 

872 

8X01110010 

140 

88C 

8X10001100 

115 

873 

8X01110011 

141 

880 

8X10001101 

116 

874 

8X01110100 

142 

8SE 

8X10001110 

117 

875 

8X01110101 

143 

88F 

8X10001111 

118 

876 

8X01110110 

144 

890 

8X10010000 

119 

877 

8X01110111 

145 

891 

8X10010001 

120 

878 

8X01111000 

146 

892 

8X10010010 

121 

879 

8X01111001 

147 

893 

8X10010011 

122 

87A 

8X01111010 

148 

894 

8X10010100 

123 

87B 

8X01111011 

149 

895 

8X10010101 

Í24 

87C 

8X01111100 

150 

896 

8X10010110 

125 

870 

8X01111101 

151 

897 

8X10010111 

126 

87E 

8X01111110 

152 

898 

8X10011000 

127 

87F 

8X01111111 

153 

899 

8X10011001 

128 

880 

8X10000000 

154 

89A 

8X10011010 

129 

881 

8X10000001 

155 

89S 

8X10011011 
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J56 

S9C 

&X10011100 

182 

8B6 

8X10110110 

157 

89D 

&X10011101 

183 

8B7 

8X10110111 

158 

89E 

8X10011110 

184 

8B8 

8X10111000 

159 

&9F 

8X10011111 

185 

8B9 

8X10111001 

160 

UO 

8X10100000 

186 

8BA 

8X10111010 

161 

MI 

8X10100001 

187 

8BB 

8X10111011 

162 

M2 

8X10100010 

188 

88C 

8X10111100 

163 

M3 

8X10100011 

189 

8B0 

8X10111101 

164 

M4 

8X10100100 

190 

8BE 

8X10111110 

165 

M5 

8X10100101 

191 

8BF 

8X10111111 

166 

M6 

8X10100110 

192 

8C0 

8X11000000 

167 

M7 

8X10100111 

193 

8C1 

M11000001 

168 

M8 

8X10101000 

194 

8C2 

8X11000010 

169 

U9 . 

8X10101001 

195 

8C3 

8X11000011 

170 

MA 

8X10101010 

196 

8C4 

8X11000100 

171 

M8 

8X10101011 

197 

8C5 

8X11000101 

172 

MC 

8X10101100 

198 

8C6 

8X11000110 

173 

MD 

8X10101101 

199 

8C7 

8X11000111 

174 

ME 

8X10101110 

200 

8C8 

8X11001000 

175 

MF 

8X10101111 

201 

8C9 

8X11001001 

176 

&B0 

8X10110000 

202 

8CA 

8X11001010 

177 

8B1 

8X10110001 

203 

8CB 

M11001011 

178 

tB2 

8X10110010 

204 

8CC 

M11001100 

179 

tB3 

8X10110011 

205 

8C0 

M11001101 

180 

tB4 

8X10110100 

206 

8CE 

8X11001110 

181 

US 

8X10110101 

>07 

8CF 

M11001111 
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decimal 
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decimal 

hex 

binario 

208 

too 

£X11010000 

234 

£EA 

£X11101010 

209 

&01 

£X11010001 

235 

£EB 

£X11101011 

210 

£02 

£X11010010 

236 

£EC 

£X11101100 

211 

£03 

£X11010011 

237 

£E0 

£X11101101 

212 

£04 

£X11010100 

238 

&EE 

£X11101110 

213 

£05 

£X11010101 

239 

£EF 

£X11101111 

2U 

£06 

£xnoioiio 

240 

£F0 

£X11110000 

215 

£07 

£X11010111 

241 

£F1 

£X11110001 

216 

£08 

£X11011000 

242 

£F2 

£X11110010 

217 

£09 

£X11011001 

243 

£F3 

£X11110011 

218 

£DA 

£X11011010 

244 

£F4 

£X11110100 

219 

£0B 

£X11011011 

245 

£F5 

£X11110101 

220 

£0C 

£X11011100 

246 

£F6 

£X11110110 

221 

£00 

£X11011101 

247 

£F7 

£X11110111 

222 

£0E 

£X11011110 

248 

£F8 

£X11111000 

223 

&0F 

£X11011111 

249 

£F9 

£X11111001 

224 

£E0 

£X11100000 

250 

£FA 

£X11111010 

225 

£E1 

£X11100001 

251 

£FB 

£X11111011 

226 

£E2 

£X11100010 

252 

£FC 

£X11111100 

227 

£E3 

£X11100011 

253 

£FD 

£X11111101 

228 

£E4 

£X11100100 

254 

£FE 

£X11111110 

229 

£E5 

£X11100101 

255 

£FF 

£X11111111 

230 

£E6 

£X11100110 




231 

£E7 

£X11100111 




232 

£E8 

£X11101000 




233 

£E9 

£X11101001 
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0 
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H 
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EQ 
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EQ 
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7 
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SET 
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SET 
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E 
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0 

1 

2 

3 

4 

5 

6 

7 

4 

IN 

B.(C) 

OUT 

|C).B 

SBC 

HL.8C 

LO 

tnn)pc 

NEG 

RETN 

IM 0 

LD 

JLA .. 

5 

IN 

D.IC) 

OUT 

|C).P 

SBC 

HL.DE 

LO 

lnn).DE 



IM 1 

LO 

A.l 

6 

IN 

H,(C) 

OUT 

(C).H 

SBC 

HL.HL 

LD 

(nn).HL 




RRD 

7 



SBC 

HL.SP 

LD 

(nnl.SP 





8 









9 









A 

LDI 

CPI 

INI 

OUTI 






LDIR 

CPIR 

INIR 

OTIR 
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8 

9 

A 

B 

c 

D 

í 

F 

4 

IN 

C.IC) 

OUT 

(C).C 

ADC 

HL.BC 



RETI 



5 

IN 

E,(C) 

OUT 

|C),E 

ADC 

HL.GE 




IM 2 

LD 

A.R 

6 

IN 

L,IC) 

OUT 

1C1,L 

ADC 

HL.HL 

BüB 




RLD 

7 

IN 

A,(C) 

OUT 

(C),A 

ADC 

HL,SP 

LD 

SP.Innl 





8 









9 









A 

LDD 

CPD 

IND 

OUTD 




■ 

B 

LDDR 

CPDR 

_ 

INDR 

OTDR 


r 


■ 







Anexo 


!.23 


EXPLICACION PARA LAS SIGUIENTES TABLAS: 


En la primera tabla los códigos S<CB, 8.-ED, ?¡DD y ?:FD están 
representados por -flechas. Esto significa: 

Í<CB: si el código a traducir es ?<CB debe buscarse el segundo 
código en la segunda tabla. Estos comandos son los comandos de 
rotación y desplazamiento. 

?(ED: si el primer código a traducir es S¡ED debe buscarse el 
segundo código en la tercera tabla. 

8íDD y SíFD: si el primer código es S<DD o !<FD se trata de comandos 
de dirección indexada. ?/DD se refiere al registro IX y ?<FD al 
registro lY. Los comandos de dirección indexada no se reflejan en 
otra tabla. Pueden obtenerse de las tablas presentes ■ de la 
siguiente forma: el segundo código se busca como de costumbre en 
las tablas, el comando obtenido ha de contener el registro HL. Si 
el registro HL no aparece en el operando o si se ha obtenido el 
comando EX DE,HL se trata de un comando inválido (visualizado por 
el disassembler como II!). Si se trata de un comando válido debe 
reemplazarse el registro HL por IX/IY. 

HL se convierte en IX/IY. 

HL se convierte en (IX + dis)/(IY +■ dis), donde -’dis’ se determina 
por el tercer código. 

Estas reglas son válidas excepto en el comando JP (HL) para todos 
los comandos que contienen HL. De JP (HL) de todas formas, aunque 
HL se representa entre paréntesis, se obtiene después de la 
inserción de los registros índices JP ¡1X)/JP(IY). 
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OESTiNATION 


SOURCE 




REG. 

INDIR 




(HL) 




ED 

LDI' - Load (OEM—(HLI 



AO 

Inc HL & DE, Ote BC 



EO 

'LOIR,' - Load (OE)-«—(HL) 

REG. 


BO 

Inc HL & DE. Dtc BC. Rtpaal until BC ■ 0 

INDIR. 


EO 

LOO' - Load (DE)<«—(HL) 



A8 

Dac HL& OE. Dtc BC 



EO 

LOOR' - Load(DEI*«—(HL) 



88 

Dtc HL & DE. Ote BC, Rtptat until BC ■ 0 


Rt9 

HL 

pointi to lourct 

Rtg 

DE 

potnti to dtitination 

Rtg 

BC 

it bytt counttr 


SEARCH 

LOCATION 


REG. 

INDIR. 


(HL) 


ED 

'CPI' 

At 

Inc HL, Dac BC 

ED 

'CPIR', Inc HL, DacBC 


rapaat until BC ■ 0 or firtd match 

ED 

A9 

'CPO' Dac HL & BC 

ED 

’CPDR' Dac HL & BC 

B9 

Rapaat until BC • 0 or firtd match 


HL point< to loeation in mamory 
to ba comparad with accumulator 
con tan ts 

BC it byta countar 
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SOURCE 



REGISTE R ADDRESSING 

REG. 

INDiR. 

INDEXED 

IMMED. 

B 

D 

B 

B 

B 

B 

B 

(HL) 



B 




M 

BB 

BB 

B| 

H 

■B 

DD 

FD 


ADO' 

17 








86 

86 

ce 



■1 

IbI 


m 

Ib 

ÜH 


d 

d 

n 


pn 

■1 

BB 

BB 

BB 

B| 

BB 

BB 

ÓD 

FD 


ADDwCARRY 









8E 

8E 

CE 

ADC' 

MÍ 

Ib 

wm 

U 

BB 

U 

Ib 

BB 

d 

d 

A 



B1 

BB 

BB 

BB 


B1 

BB 

DO 

FD 


SUBTRACT 

97 








96 

96 

oe 

SUB’ 


Bfl 

■1 

Ib! 

Ib 

Ib 

Ib 


d 

d 

n 


■■ 

■I 

BB 


BB 

BB 


BB 


FD 






9A 



90 


ESH 

9E 

oe 


u 

Ib 

U 


U 

Ib 


BB 


d 

n 










DD 


BB 

AND' 

A7 

AO 

Al 

A2 

A3 

A4 

AB 

AB 

A6 

IS 











d 

BB 

BB 




■B 

|B| 





OD 

FD 


•XOR' 

A9 

AB 



AB 

AC 

AO 

AE 

AE 

AE 

EE 




Hi 

nn 





d 

d 

A 



P| 

BB 

H 

|B| 



B| 


FD 

BB 

OR' 

■7 









86 

B3 



Kl 

BB 

BB 

IHi 

M 


HI 


d 

BB 



H 

^B 

M 

Hi 

BB 



DD 

FD 


COMPARE 







BO 

B 

BE 

BE 

FE 

'CP' 

IbI 

Hi 

BB 

BB 

BB 

BB 



d 

d 

A 










DD 

FD 




M 

X 

14 

1C 

M 

2C 

34 

34 

34 



idi 








d 

d 






BB 





DD 

FD 


DECREMENT 

3D 

Oi 

oo 


10 

S 

20 

B 

35 

35 


'DEC' 



_ 

BB 





d 

d 



D«cimal Adjust Acc. 'DAA' 

27 

Compicment Acc, 'CPL' 

2F 

N« 9 ate Acc, 'NEG' 

EO 

(2't compitmcnt) 

44 

Complement Carry Flag, 'CCF' 

» 

Set Carry Flag, 'SCF' 

37 
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CONDITiON 


UN- NON NON PARITV PAfttTV $IGN SIGN REO 

CONO CARRV CARRY ZCRO ZERO EVEN OOD NEG POS BoO 



HETURN FROM 
NON MASKABLE 
INT'RETN’ 


NOTE-CERTAIN 
FLAGSHAVE MORE 
THAN ONE PURPOSE. 


REGISTER (SP) 
INDIR. (SP4^1) 


RETURN FROM REG. <$P) EO 

INT'RETr INDIR. (SP^I) 40 


REa (SP) EO 

INOIR. (SP^D 45 


38 

•-2 

30 

9-2 

1 


70 

9-7 






REFERTO SECTION 
6.0 FOR DETAILS 



RST 0’ 

•RST 8' 

'RST 16' 

'RST 24' 

■RST 32' 

RST 40' 

'RST 48' 

RST 56' 
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SOURCE 



REGISTER 

REG. 

IND. 

A 

B 

C 

D 

E 

H 

L 

(HLI 


IMMED. 

(n) 









'our 






















REG. 

(Cl 

ED 

ED 

ED 

ED 

ED 

ED 

ED 



IND. 


79 

41 

49 

51 

59 

61 

69 


‘OUir-OUTPUT 

REG. 

(C) 








ED 

(nc HL. Ote b 

IND. 









A3 

'OTIR - OUTPUT, Ine HL. 

REG. 

(Cl 








ED 

D«c B, REPEAT IP B^ 

INO. 









B3 

'OUTD' - OUTPUT 

REG. 

(Cl 








ED 

OacHLSiB 

IND. 









AB 

OTDR' - OUTPUT. D«c HL 

REG.' 

(Cl 








ED 

& B, REPEAT IF B^O 

IND. 









BB 


FORT 

DESTINATION 

AODRESS 


•NOP* 

00 

'HALT' 

71 

OISABLE INT 'IDII' 

F3 

ENABLE INT '(El)' 

ra 

SET INT MODE 0 

ED 

'IMIT 

46 

SET INT MODE 1 

ED 

'IMV 

56 

SET INT MODE 2 

ED 


SE 


8080A MOOE 


CALL TO LOCATION 0038^ 


INDIRECT CALL USING REGtSTER 
I ANO 6 BITS FROM INTERRUPTING 
DEVICE AS A POiNTER. 


BLOCK 
> OUTPUT 
I COMMANOS 
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ADD A.s. ADC A.s 
SL'Bs.SBC A.s.CPs, Nlü 

ANDs 
ÜR s, XOR s 
INCs 
DtC ni 
ADD DD, ss 
ADC MI, « 

SBC HL.ss 

EILA;RLCA,RRA,RRCA 
RL ni RLC m, RR m. RRC m 
SLA m, SRA m.SRL m 
RLD, RRD 
DA A 
CPL 
SCF 
CCF 
IN r,(C) 

INI;IND;OUTI;OUTD 
INIR;1NDR;0TIR; OTDR 
LDI, LDD 
LDIR, LDDR 
CPI,CP1R,CPD,CPDR 


LD A, l;LD A, R 


t l V t 0 t 
í l V t I í 

0 1 P 1 0 1 
0 t P t 0 0 

• í V t o l 

• t V t I t 

t • • • o X 

t í V t o X 

t t V t 1 X 

í • • • o o 

t t P t o o 

• í P t o o 

t í p t • í 

• • • • I I 

1 • • • o o 

t • • • o X 

• t P t o o 

• t X X I 

• 1 X X 1 X 

• X t X o o 

• X o X o o 

• t t t I X 


• t IFFt o o 

• t X X o I 

í í V t 1 í 


Comments 


8'bit add or add with carry 
8-bit subtracl, subtract with carry, compare and 
negate accumulator 
Lógica] operations 
And sel's different ílags 
8-bit increment 
8-bii decremcnt 
l6-bi( add 

ió-bit add with carry 
ió-bit subtract with carry 
Rotate accumulator 
Rotate and shift locatiun m 

Rotate digit left and ri^t 
Decimal adjust accumulator 
Complement accumulator 
Set carry 

Complement carry 

Inpul register indirect 

Block input and output 

Z = O if B 0 otherwise Z = 1 

Block transfer instructions 

P/V = I if BC ^ 0, otherwise P/V = 0 

Block search instructions 

Z = 1 if A = (HL), otherwise Z = 0 
P/V = 1 if BC 0. otherwise P/V = 0 
The contení of Ihe inlerrupt enable flip-flop (IFF) 
iscopied into the P/V flag 

The State of bit b of location s is copied into the Z flag 
Negate accumulator 


The foliowing notation is used in this table: 

Symbol Operation 

C Carry/Unk flag. C*1 if the operation produced a carry from the MSB of the operand or result. 

Z Zero flag. Z* 1 if the result of the operation is zero. 

S Sign flag. S*1 if the MSB of the result is one. 

P/V Parity or overflow flag. Parity (P) and overflow (V) share the same fUg. Lógica) operations affect this flag 

with the parity of the result while arithmetic operations affect this flag with the overflow of the result. If P/V 

holds parity. P/V» 1 if the result of the operation is even, PA^»0 if result is odd. If P/V holds overflow. P/V*l 

if the result of the operation produced an overflow. 

H Half-carry flag. H»t if the add or subtract operation produced a carry into or borrow from into bit 4 of the accumulator 

N Add/Subtract flag, N»1 if the previous operation was a subtract. 

H and N flags are used in conjunction with the decimal adjust instruction (OAA) to properly correct the re¬ 
sult into packed DCD format foUowing addition or subtraction using operands with packed BCD format. 

t The flag is affected according to the result of the operation. 

• The flag is unchanged by the operation. 

0 The flag is reset by the operation. 

1 The flag is set by the operation. 

X The flag is a "don’l care.” 

V P/V flag affected according to the overflow result of the operation. 

P P/V flag affected according to the parity result of the operation. 

r Any one of the CPU registers A, B, C, D, E. H. L. 

$ Any 8‘bit location fot aJl the addressing modes allowed for the particular instruction.. 

SI Any 16-bit location for all the addressing modes allowed for that instruction. 

ü Any one of the two Index registers IX or lY. 

R Reüesh counter. 

n 8'bit valué in range 255^ 

nn 16 -bit valué in range <0, 65S3S> 

m Any 8-bit location for all the addressing modes allowed for the particular instruction. 





COMMODORE 



Ofrece un campo fascinante y amplio de 
problemáticas científicas. Para esto el 
libro contiene muchos listados intere¬ 
santes; Análisis de Fornier y síntesis, 
análisis de redes, exactitud de cálculo, 
formateado de números, cálculo del 
valor PH. sistemas de ecuaciones dife¬ 
renciales, modelo ladrón presa, cálculo 
de probabilidad, medición de tiempo, 
integración, etc. 

64 en el campo de la Técnica y la 
Ciencia. 361 págs. P.V.P. 2.800,- 
ptaa. 



La obra Standard del floppy 1541, todo 
sobre la programación en disquettes 
desde los principiantes a los profesio¬ 
nales. además de las informaciones 
fundamentales para el DOS, los coman¬ 
dos de sistema y mensaies de error, 
hay varios capítulos para la administra¬ 
ción práctica de ficheros con el FLOP¬ 
PY, amplio y documentado Listado del 
Dos. Además un filón de los más 
diversos programas y rutinas auxilia¬ 
res, que hacen del libro una lectura 
obligada para los usuarios del Floppy. 
Todo sobro ol Floppy 1541. Precio 
venta 3.200 ptsi. 



Un excelente libro, que le mostrará 
todas las posibilidades que le ofrece su 
grabadora de casettes. Describe deta¬ 
lladamente. y de forma comprensible, 
todo sobre el Oatassette y la grabación 
en cassette. Con verdaderos programas 
fuera de serie; Autostart, Catálogo 
(ibusca y carga automáticamente!), 
backup de y a disco, SAVE de áreas de 
memoria, y lo más sorprendente; un 
nuevo sistema operativo de cassette 
con el 10-20 veces más rápido Fast 
Tape. Además otras indicaciones y 
programas de utilidad (ajuste de cabe¬ 
zales, altavoz de control). 

El Manual dal Cassette. 190 pág. 
P.V.P. 1.600.-ptas. 



jPor fin una introducción al código 
máquina fácilmente comprensible! 
Estructura y funcionamiento del proce¬ 
sador 6510, introducción y ejecución 
de programas en lenguaje máquina, 
manejo del ensamblador, y un simula¬ 
dor de paso a paso escrito en BASIC. 
Lenguaje máquina para Commodore 
64.1984,201 pág. P.V.P. 2.200,- 
ptas. 



CONSEJOS Y TRUCOS, con más de 
70.000 ejemplares vendidos en Alema 
nia, es uno de los libros más vendidos 
de DATA 6ECKER. Es una colección 
muy interesante de ideas para la pro¬ 
gramación del Commodore 64. de PO- 
KEs y útiles rutinas e interesantes 
programas. Todos los programas en 
lenguaje máquina con programas car¬ 
gadores en Basic. 

64 Consejos y Trucos. 1984, 364 pág. 
P.V.P. 2.800,- ptas. 



Este libro, contiene muchos interesan¬ 
tes programas de aprendizaje para 
solucionar problemas, descritos deta¬ 
lladamente y de manera fácilmente 
comprensible. Temas; progresiones 
geométricas, palanca mecánica, creci¬ 
miento exponencial, verbos irregulares, 
ecuaciones de segundo grado, movi¬ 
mientos de péndulo, formación de 
moléculas, aprendizaje de vocablos, 
cálculo de interés y su capitalización. 
Manual escolar para su Commodore 
64.389 págs. P.V.P. 2.800,- ptas. 



En el libro de los robots se muestran las 
asombrosas posibilidades que ofrece el 
CBM 64. para el control y la programa¬ 
ción, presentadas con numerosas itus- 
traciones e intuitivos ejemplos. El punto 
principal; Cómo puede construirse uno 
mismo un robot sin grandes gastos. 
Además, un resumen del desarrollo 
histórico del robot y una amplia intro¬ 
ducción a los fundamentos cibernéti¬ 
cos. Gobierno del motor, el modelo de 
simulación, interruptor de pantalla, el 
Port-Usuarío cómodo del modelo de 
simulación. Sensor de infrarrojos, con¬ 
cepto básico de un robot, realimenta¬ 
ción unidad cibernética. Brazo prensor. 
Oír y ver. 

Robótica para tu Commodore 64.340 
págs. P.V.P. 2.800 ptas. 



Saberse apañar uno mismo, ahorra 
tiempo, molestias y dinero, precisa¬ 
mente problemas como el ajuste del 
floppy o reparaciones de la platina se 
pueden arreglar a menudo con medios 
sencillos. Instrucciones para eliminar la 
mayoría de perturbaciones, listas de 
piezas de recambio y una introducción a 
la mecánica y a la electrónica de la 
unidad de disco, hay también indicacio¬ 
nes exactas sobre herramientas y mate¬ 
rial de trabajo. Este libro hay que 
considerarlo en todos sus aspectos 
como efectivo y barato. 
Mantenimiento y reparación del 
Floppy 1541.325 págs. P.V.P. 2.800,- 
ptas. 








Este es ei libro que buscaba; un 
díccíonarío general de micros que con¬ 
tiene toda la terminología informática 
de la A a la Z y un diccionario técnico 
con traducciones de tos términos ingle¬ 
ses de más importancia • los DICCIO¬ 
NARIOS DATA DECKER prácticamente 
son tres libros en uno. La increíble 
cantidad de información que contienen, 
no sólo los convierte en enciclop^ias 
altamente competente, sino también en 
herramientas indispensables para el 
trabaio. El DICCIONARIO DATA DEC¬ 
KER se edita en versión especial para 
APPLE II. COMMOOORE 64 e IDM PC. 
El dIccIoMrlo para ta Commodort 64. 
350 pág. P.V.P. 2.600.-ptat. 


¿Ud. ha logrado iniciarse en código 
máquina? Entonces el «nuevo Engiish» 
le ensebará cómo convertirse en un 
profesional Naturalmente con muchos 
programas ejemplo, rutinas completas 
en código máquina e importantes con¬ 
sejos y trucos para la programación en 
lenguaje máquina y para el trabajo con 
el sistema operativo. 

Lenguale máquiM pan avaioadoi 
CBM 54.1964,206 pég. P.V.P. 2.200 
ptat. 


Gráficos para el Commodore 64 es un 
libro para todos los que quieren hacer 
algo creativo con su ordenador. El 
contenido abarca desde los fundamen¬ 
tos de la programación de gráficos 
hasta el diseño asistido por ordenador 
(CAD). 

Gráficos pan al Commodon 64.295 
paga. P.V.P. 2.200,- ptat. 


Con más de 60.000 ejemplares vendi¬ 
dos. ésta es la obra estándar para el 
COMMOOORE 64. Todo sobre la tecno¬ 
logía. el sistema operativo y la progra¬ 
mación avanzada del C-64. Con listado 
completo y exhaustivo de la ROM. 
circuitos originales documentados y 
muchos programas. iConozca su C-64 
a fondo! 

64 iRttno. 1964,352 pág. P.V.P. 
3.600,-pías. 



Casi todo lo que se puede hacer con el 
Commodore 64, está descrito detalla¬ 
damente en este libro. Su lectura no es 
tan sólo tan apasionante como la de una 
novela, sino que contiene, además de 
listados de útiles programas, sobre 
todo muchas, muchas aplicaciones rea¬ 
lizables en el C64. En parte hay listados 
de programas listos para ser tecleados, 
siempre que ha sido posible condensar 
«recetas» en una o dos páginas. Si 
hasta el momento no sabía que hacer 
con su Commodore 64, jdespués de 
leer este libro lo sabrá seguro! 

El libro do Moas dol Commodore 64. 
1964. más do 200 páginas. P.V.P. 
1.600.-ptat. 



Este libro ofrece una amplia práctica 
introducción en el importante tema de 
la gestión de ficheros y bancos de 
datos, especialmente para los usuarios 
del Commodore 64. Con muchas inte¬ 
resantes rutinas y una confortable ges¬ 
tión de ficheros. 

Todo sobro batas da datos y gestión 
da ficharos para Commodora-Bd. 221 
págs. P.V.P. 2.200,- ptat. 



Para los usuarios que posean un VIC- 
20. C-64 o PC-128 este libro contiene 
gran cantidad de consejos, trucos, 
listados de programas, así como infor¬ 
mación sobre Hardware, tanto sí usted 
dispone de una impresora de margarita 
o de matriz, como si tiene un Plotter 
VC-1520. el GRAN LIDRO DE IMPRE¬ 
SORAS constituye una inestimable 
fuente de información. 

Todo sobra Imprasorat. 361 págs. 
P.V.P. 2.600.-ptas. 



Con importantes comandos PEEK y 
POKE se pueden hacer también desde el 
Dasic muchas cosas, para las que se 
necesitarían normalmente complejas 
rutinas en lenguaje máquina. Con una 
enorme cantidad de POKEs importantes 
y su posible aplicación. Para ello se 
explica perfectamente la estructura del 
Commodore 64; Sistema operativo, 
interpretador, página cero, apuntadores 
y stacks, generador de caracteres, 
registros de sprites, programación de 
interfaces, desactivación de interrupt. 
Además una introducción al lenguaje 
máquina. Muchos programas ejemplo. 
PEEKSyPOKES.ITTpág. P.V.P. 
1.600.-pUt. 






















Este libro presenta una detallada e 
interesante Introduccidn a la teoría, 
conceptos básicos y posibilidades de 
uso de la inteligencia artilicial (1A). 
Desde un resumen histórico sobre las 
máquinas •pensantes» y «vivientes» 
hasta programas de aplicación para el 
Commodore 64. 

Iiitallgaiicla artilicial. 395 pága. 

2.500,- pus. 



64, Conseios y Trucos vol. 2 contiene 
una gran prolusión de programas, 
estfmulos y muchas rutinas útiles. Un 
libro que consbtuye una ayuda impres¬ 
cindible para todo aquél que quiera 
escribir programas propios con el 
COMMODORE. 

Conseios y Tmcos, Commodore 64. 
Vol. 2.259 págs. 2.200,- ptas. 



Este libro olrece al programador intere¬ 
sado una introducción tácilmente com¬ 
prensible para los tan extendidos As- 
sembler PflOFI-ASS, SM MAE y T.E- 
X.ASS. con conseios y trucos de gran 
utilidad, indicaciones y programas adi¬ 
cionales. Al mismo tiempo sirve de 
manual orientado a la prácbca, con 
aclaraciones de conceptos Importantes 
e instrucciones. 

El Ensamblador. 250 páginas. 2.200,- 
ptas. 



El libro de Primicias del Commodore 
128 no olrece solamente un resumen 
completo de todas las características y 
rendimientos del sucesor del C-64 y 
con ello una Importante ayuda para su 
adquisición. Muestra, además, todas 
las posibilidades del nuevo equipo en 
tunclón de sus tres modos de opera¬ 
ción. 

Todo sobra al nnovo Commodors 120. 
250págs. P.V.P. 2.200,-ptas. 



El libro Commodore 128-Conse|os y 
Trucos es un lilón para cualquier posee¬ 
dor del C-128 que desee sacar más 
partido a su ordenador. Esle libro no 
sólo contiene gran cantidad de progra¬ 
mas-ejemplo, sino que además explica 
de un modo sencillo y tácll la contlgura- 
clón del ordenador y de su programa¬ 
ción. 

Commodore 120-Consa|os y Trucos. 
327 págs. 2.000,- ptas. 






































AMSTRAD 



Ofrece una colección muy interesante 
de sugerencias, ideas y soluciones para 
la programación y utilización de su 
CPC-464: Desde la estructura del hard¬ 
ware, sistema de funcionamiento - 
Tokens Basic, dibujos con el joystick, 
aplicaciones de ventanas en pantalla y 
otros muchos interesantes programas 
como el procesamiento de datos, editor 
de sonidos, generador de caracteres, 
monitor de código máquina hasta lista¬ 
dos de interesantes juegos. 

CPC-464 Constiot y Trucos. 263 pifs. 
P.V.P. 2.200.-ptas. 



Escrito para alumnos de los últimos 
cursos de E66 y de BUP, este libro 
contiene muchos programas (ura resol¬ 
ver problemas y de aprendizaje, descri¬ 
tos de una forma muy compleja y fácil 
de comprender. Teorema de Pitágoras, 
progresiones geométricas, escritura ci¬ 
frada, crecimiento exponencial, veitos 
irregulares, igualdades cuadráticas, 
movimiento pendular, estructura de 
moléculas, cálculo de interés y muchas 

rncae mác 

CPC.464 El Ufen M eoKghi. 380 
págs. P.V.P. 2.2<IO,-|ltat. 



PEtKS, POKES y CALIS s« utlKim para 
introducir al lector de una forma fácil¬ 
mente accesible al sistema operativo y 
al lenguaje máquina del CPC. Propor¬ 
ciona además muchas e Interesantes 
posibilidades de aplicación y programa¬ 
ción de su CPC. 

PEEKS y POKES d*l CPC 464/1128. 
1SOpio.P.V.P.1.600,-ptai. 



El libro del lenguaje máquina para el 
CPC 464/6128 está pensado para todos 
aquellos a quienes no las resulta sufi¬ 
ciente con las posibilidades y rapidez 
del BASIC. Se explican aquí detallada¬ 
mente las bases de la programación en 
lenguaje máquina, el funcionamiento 
del procesador Z-80 con sus respecti¬ 
vos comandos asi como la utilización 
de las rutinas del sistema con abundan¬ 
tes ejemplos. El libro contiene progra¬ 
mas completos de aplicación tales Có¬ 
mo Ensamblador. Desensamblador y 
Monitor, facilitando de esta manera la 
introducción del lector en el lenguaje 
máquina. 

El LiMiialt MImIm dal CPC 464/ 
6128.338 pág. P.V.P. 2.200,- gtai. 



El LIBRO DEL FLOPPY del CPC lo 
explica todo sobre la programación con 
discos y la gestión relativa de ficheros 
mediante el floppy DDI-1 y la unidad de 
discos Incorporada del CPC 664/6128. 
La presente obra, un auténtico stán- 
darf, representa una ayuda Incompara¬ 
ble tanto para el que desee iniciarse en 
la programación con discos cómo para 
el más curtido programador de ensam¬ 
blados. Especialmente interesante re¬ 
sulta el listado exhaustivamente comen¬ 
tado del DOS y los muchos programas 
de ejemplo, entre los que se Incluye un 
completo paquete de gestión de fiche¬ 
ros. 

El Libro dal Floppy dol CPC. 353 pág. 
P.V.P. 2.800,. ptai. 



jDomInar CP/M por fin! Desde explica¬ 
ciones básicas para almacenar núme¬ 
ros, la protección contra la escritura, o 
ASCII, hasta la aplicación de programas 
auxiliares de CP/M, asi como «CP/M 
interno» para avanzados, cada usuario 
del CPC rápidamente encontrará las 
ayudas e Informaciones necesarias, 
para el trabajo con CP/M. Este libro 
tiene en cuenta las versiones CP/M 2.2. 
asi como CP/M Plus (3.0), para el 
AMSTRAD CPC 464, CPC 664 y CPC 
6126. 

CP/M. El libro da a|orclclot para CPC. 
280 pág. P.V.P. 2.800,-ptas. 





























































MSX 



Escrito para alumnos de (os últimos 
cursos de EGB y de BUP, este libro 
contiene muchos programas para resol* 
ver problemas y de aprendizaje, descri¬ 
tos de una forma muy completa y fácil 
de comprender. Teorema de Pítágoras, 
progresiones geométricas, escritura ci¬ 
frada, crecimiento exponencial, verbos 
irregulares, igualdades cuadráticas, 
movimiento pendular, estructura de 
moléculas, cálculo de interés y muchas 
cosas más. 

MSX ei Manual Escolar. 389 págs. 
P.V.P. 2.800.-pfat. 



El libro contiene una amplia colección 
de importantes programas que abar¬ 
can, desde un desensamblador hasta 
un programa de clasificaciones deporti¬ 
vas. Juegos superemocionantes y apli¬ 
caciones completas. Los programas 
muestran además importantes consejos 
y trucos para la programación. Estos 
programas funcionan en todos los or¬ 
denadores MSX, así como en el SPEC- 
TROVIOEO 318 328, 

MSX Prooramtt y Utilidades, 1985, 
194 pág. P.V.P. 2.200,-ptai. 



Las computadoras MSX no sólo ofrecen 
una relación precio/rendimiento sobre¬ 
saliente, sino que también poseen unas 
cualidades gráficas y de sonido excep¬ 
cionales. Este libro expone las posibili¬ 
dades de los MSX de forma completa y 
fácil. El texto se completa con numero¬ 
sos y útiles programas ejemplo. 

MSX Gráficos y Sonidos, 250 págs. 
P.V.P. 2.800,-ptas. 



Este libro confine una colección sin 
igual de trucos y consejos para todos 
los ordenadores con la nueva norma 
MSX. No sólo contiene las recetas 
completas, sino también los conoci¬ 
mientos básicos necesarios. 

MSX • Consalos y Trucos. 288 págs. 
P.V.P. 2.200,- ptas. 



P| libro del Lenguaje Máquina para el 
MSX está creado para todos aquellos a 
quienes el BASIC se les ha quedado 
pequeño en cuanto a rendimiento y 
velocidad. Desde las bases para la 
programación en Lenguaje Máquina, 
pasando por el método de trabajo del 
Procesador Z-dO y una exacta descrip¬ 
ción de sus órdenes, hasta la utilización 
de rutinas del sistema todo ello ha sido 
explicado en detalle e ilustrado con 
múltiples ejemplos en este libro. 

El libro contiene, además, como pro¬ 
gramas de aplicación, un ensamblador 
un desensamblador y un monitor. 
MSX Lenguija Máquina. 306 págs. 
2.200,- ptas. 


ZX SPECTRUM 


Una interesante colección de sugestivas 
ideas y soiuciones para la programa¬ 
ción y utilización de su ZX ESPEC- 
TRUM. Aparte de muchos peeks. pokes 
y USRs hay también capítulos comple¬ 
tos para, entre otros, entrada de datos 
asegurado sin bloqueo de ordenador, 
posibilidades de conexión y utilización 
de microdrives y lápices ópticos, pro¬ 
gramas para la representación de dia¬ 
gramas de barra y de tarta, el modo de 
utilizar óptimamente ROM y RAM. 

ZX Spectrum Contajot y Tnicoi, 211 
pág. P.V.P. 2.200,-ptas. 


Escrito para alumnos de los últimos 
cursos de EGB y de BUP. este libro 
contiene muchos programas para resol¬ 
ver problemas y de aprendizaie, descri¬ 
tos de una forma muy completa y fácil 
de comprender. Teorema de Pítágoras, 
progresiones geométricas, escritura ci¬ 
frada, crecimienfo exponencial, verbos 
Irregulares, igualdades cuadráticas, 
movimiento pendular, estructura de 
moléculas, cálculo de Interés y muchas 
cosas más. 

ZX Spictnm al Manual Etcolai. 319 
pági. P.V.P. 2.200,-plai. 











ATARI 



Tan Interesante como el tema, es el 
libro que explica de forma fácilmente 
comprensible el manejo de Peeks y 
Pokes Importantes, y representa un 
gran niímero de Pokes con sus posibili¬ 
dades de aplicación. Incluyendo ade¬ 
más programas ejemplo. Al lado de 
temas como lo son la memoria de la 
pantalla, los bits y los bytes, el mapa de 
la memoria, la tabla de modos gráficos 
o el sonido, también se detalla de forma 
magnifica la eslruclura del ATARI 
600XÜ800XUÍ30XE. 

PMká y PikM pin ATARI ROOXLf 
•OOXl/iaOXE. 2t1 pág. P.V.P. 2.200, 
ptM. 



Una lograda Introducción al sugestivo 
tema de los «juegos estratégicos- 
Desde juegos sencillos con estrategia 
tija a juegos complejos con procedí 
mientes de búsqueda hasta programas 
con capacidad de aprendizaje —mu 
crios ejemplos Interesantes, escritos 
por supuesto de forma fácilmente com 
prensible. Con programas de juegos 
ampliamente detallados: NIM con un 
montón, bloqueo, hexapawn, mlnl-da- 
mas y muchos más. 

Juegos estratégicos y cómo 
programarlos en al ATARI ÜOOXL/ 
800XL/130XE. 181 pág. P.V.P. 1.600.- 
pías. 



Jugar a aventuras con éxito y progra¬ 
marlas uno mismo - todo lo verdadera¬ 
mente importante sobre el tema, lo 
contiene este gula fascinante que te 
lleva a través del mundo fantástico de 
las aventuras. El libro abarca todo el 
espectro, hasta las más sofisticadas 
aventuras gráficas llenas de trucos, 
acompañándolas siempre de numero¬ 
sos programas ejemplo. Sin embargo la 
clave —al margen de muchas aventuras 
para teclear— es un generador de 
aventuras completo, mediante el cual la 
programación de aventuras se convierte 
en un juego de nióos. 

Anotorat ■ y cómo pragramailat o* tf 
ATARI 60aXU800XL/130XE. 214 pág. 
P.V.P. 2.200,- ptáS. 



Muchos programas Interesantes de so¬ 
luciones de problemas y de aprendizaje, 
descritos de forma amplía y comprensi¬ 
ble, y adecuados sobre todo para 
escolares. jAquI el aprendizaje Intensi¬ 
vo se convierte de una tarea divertida! 
Al margen de temas como los verbos 
irregulares, o las ecuaciones de segun¬ 
do grado, un resumen corto de las 
bases del tratamiento electrónico de 
datos, y una Introducción a los princi¬ 
pios del análisis de problemas, comple¬ 
tan este libro que debería obrar en 
posesión de cualquier escolar. 

El llbn escolar para ATARI 600XL/ 
800XL/130XE. 369 pág. P.V.P. 2.600,- 
ptaa. 


OTROS TITULOS 



El primer libro recomendado para es¬ 
cuelas de enseóanza de Informática y 
para aquellas personas que quieren 
aprender la programación. Cubre las 
especlflcaclónes del Ministerio de Edu¬ 
cación y Ciencia para Estudios de 
Informática. Es el primer libro que 
Introduce a la lógica del ordenador. Es 
un elemento de base que sirve como 
Introducción para la programación en 
cualquier otro lenguaje. No se requieren 
conocimientos de programación ni si¬ 
quiera de Informática. Abarca desde los 
métodos de programación clásicos a 
los más modernos. 

Mstodofogfa áa la PtagramacMa. 2S0 
pága. P.V.P.2.2IN,-ptaa. 



La técnica y programación del Procesa¬ 
dor Z80 son los temas de este libro. Es 
un libro de estudio y de consulta 
imprescindible para todos aquellos que 
poseen un Commodore 126, CPC, MSX 
u otros ordenadores que trabajan con el 
Procesador Zeo y desean programar en 
lenguaje máquina. 

El PmcaaadorZEO. 560 pág. P.V.P. 
3.600,- ptaa. 



El tema de este libro es la técnica y 
programación de los procesadores de la 
lamilla 66000. Es una obra de consulta 
Indispensable, un manual para todo 
programador que quiera ubilzar las 
ventajas del 68000. 

Tácalca y pngramaclóa pan al 
procaaaáor 68000.516 pága. P.V.P. 
3.600,-ptaa. 























EL CONTENIDO: 

¡Así es como se facilita el acceso al lenguaje máqui¬ 
na! El libro de lenguaje máquina para CPC 464, 664 y 
6128 es importante para cualquier usuario, que real¬ 
mente desee convertirse en un experto. 

Extracto del contenido: 

— Qué es el lenguaje máquina 

— Los sistemas numéricos 

— Estructura del ordenador 

— El procesador Z80 

— Estructura de la CPU 
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